projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Hilfsfunktionen zum Erzeugen von Checkbox- und Text-Input-Tags
[kivitendo-erp.git]
/
SL
/
Locale.pm
diff --git
a/SL/Locale.pm
b/SL/Locale.pm
index
e3ff236
..
8700873
100644
(file)
--- a/
SL/Locale.pm
+++ b/
SL/Locale.pm
@@
-42,6
+42,8
@@
use SL::LXDebug;
use SL::Common;
use SL::Inifile;
use SL::Common;
use SL::Inifile;
+use strict;
+
sub new {
$main::lxdebug->enter_sub();
sub new {
$main::lxdebug->enter_sub();
@@
-213,7
+215,7
@@
sub findsub {
if (exists $self->{subs}{$text_rev}) {
$text = $self->{subs}{$text_rev};
} elsif ($self->{countrycode} && $self->{NLS_file}) {
if (exists $self->{subs}{$text_rev}) {
$text = $self->{subs}{$text_rev};
} elsif ($self->{countrycode} && $self->{NLS_file}) {
-
F
orm->error("$text not defined in locale/$self->{countrycode}/$self->{NLS_file}");
+
$main::f
orm->error("$text not defined in locale/$self->{countrycode}/$self->{NLS_file}");
}
$main::lxdebug->leave_sub();
}
$main::lxdebug->leave_sub();
@@
-229,6
+231,8
@@
sub date {
my $longdate = "";
my $longmonth = ($longformat) ? 'LONG_MONTH' : 'SHORT_MONTH';
my $longdate = "";
my $longmonth = ($longformat) ? 'LONG_MONTH' : 'SHORT_MONTH';
+ my ($spc, $yy, $mm, $dd);
+
if ($date) {
# get separator
if ($date) {
# get separator
@@
-302,6
+306,7
@@
sub parse_date {
$main::lxdebug->enter_sub();
my ($self, $myconfig, $date, $longformat) = @_;
$main::lxdebug->enter_sub();
my ($self, $myconfig, $date, $longformat) = @_;
+ my ($spc, $yy, $mm, $dd);
unless ($date) {
$main::lxdebug->leave_sub();
unless ($date) {
$main::lxdebug->leave_sub();
@@
-353,11
+358,7
@@
sub reformat_date {
sprintf("%0" . (length($&)) . "d", $mm);
$output_format =~ /y+/;
sprintf("%0" . (length($&)) . "d", $mm);
$output_format =~ /y+/;
- if (length($&) == 2) {
- $yy -= $yy >= 2000 ? 2000 : 1900;
- }
- substr($output_format, $-[0], $+[0] - $-[0]) =
- sprintf("%0" . (length($&)) . "d", $yy);
+ substr($output_format, $-[0], $+[0] - $-[0]) = $yy;
$main::lxdebug->leave_sub();
$main::lxdebug->leave_sub();