Revision a7d906be
Von Moritz Bunkus vor mehr als 14 Jahren hinzugefügt
| SL/Locale.pm | ||
|---|---|---|
| 358 | 358 |
sprintf("%0" . (length($&)) . "d", $mm);
|
| 359 | 359 |
|
| 360 | 360 |
$output_format =~ /y+/; |
| 361 |
if (length($&) == 2) {
|
|
| 362 |
$yy -= $yy >= 2000 ? 2000 : 1900; |
|
| 363 |
} |
|
| 364 |
substr($output_format, $-[0], $+[0] - $-[0]) = |
|
| 365 |
sprintf("%0" . (length($&)) . "d", $yy);
|
|
| 361 |
substr($output_format, $-[0], $+[0] - $-[0]) = $yy; |
|
| 366 | 362 |
|
| 367 | 363 |
$main::lxdebug->leave_sub(); |
| 368 | 364 |
|
Auch abrufbar als: Unified diff
Jahreszahlen mit vier Ziffern ausgeben
Seit 2000 ist es eher unüblich, Jahreszahlen zweistellig zu
schreiben. Außerdem enthalten alle Nicht-ISO-Datumsformate in
Lx-Office bisher nur zwei Stellen bei der Ausgabe (z.B. beim
Ausdruck). Also umstellen auf volle Jahreslänge.
Fix für Bug 1072.