Revision cb0d3042
Von Moritz Bunkus vor fast 18 Jahren hinzugefügt
SL/Form.pm | ||
---|---|---|
576 | 576 |
|
577 | 577 |
# set dateform for jsscript |
578 | 578 |
# default |
579 |
$ifFormat = "%d.%m.%Y"; |
|
580 |
if ($myconfig->{dateformat} eq "dd.mm.yy") { |
|
581 |
$ifFormat = "%d.%m.%Y"; |
|
582 |
} else { |
|
583 |
if ($myconfig->{dateformat} eq "dd-mm-yy") { |
|
584 |
$ifFormat = "%d-%m-%Y"; |
|
585 |
} else { |
|
586 |
if ($myconfig->{dateformat} eq "dd/mm/yy") { |
|
587 |
$ifFormat = "%d/%m/%Y"; |
|
588 |
} else { |
|
589 |
if ($myconfig->{dateformat} eq "mm/dd/yy") { |
|
590 |
$ifFormat = "%m/%d/%Y"; |
|
591 |
} else { |
|
592 |
if ($myconfig->{dateformat} eq "mm-dd-yy") { |
|
593 |
$ifFormat = "%m-%d-%Y"; |
|
594 |
} else { |
|
595 |
if ($myconfig->{dateformat} eq "yyyy-mm-dd") { |
|
596 |
$ifFormat = "%Y-%m-%d"; |
|
597 |
} |
|
598 |
} |
|
599 |
} |
|
600 |
} |
|
601 |
} |
|
602 |
} |
|
579 |
my %dateformats = ( |
|
580 |
"dd.mm.yy" => "%d.%m.%Y", |
|
581 |
"dd-mm-yy" => "%d-%m-%Y", |
|
582 |
"dd/mm/yy" => "%d/%m/%Y", |
|
583 |
"mm/dd/yy" => "%m/%d/%Y", |
|
584 |
"mm-dd-yy" => "%m-%d-%Y", |
|
585 |
"yyyy-mm-dd" => "%Y-%m-%d", |
|
586 |
); |
|
587 |
|
|
588 |
my $ifFormat = defined($dateformats{$myconfig{"dateformat"}}) ? |
|
589 |
$dateformats{$myconfig{"dateformat"}} : "%d.%m.%Y"; |
|
603 | 590 |
|
591 |
my @triggers; |
|
604 | 592 |
while ($#_ >= 2) { |
605 | 593 |
push @triggers, qq| |
606 | 594 |
Calendar.setup( |
Auch abrufbar als: Unified diff
Keine globalen Variablen benutzen. Außerdem die etwas hässliche if/else-Kaskadierung entfernt.