Add a hack to readd the day of weeks in default date formats

This commit is contained in:
bapt 2016-05-28 21:25:24 +00:00
parent d9b0c1c4d2
commit 26fece6d51

View File

@ -199,6 +199,8 @@ sub callback_cformat {
my $s = shift;
$s =~ s/ %Z//;
$s =~ s/ %z//;
$s =~ s/^"(%B %e, )/"%a, $1/;
$s =~ s/^"(%e %B )/"%a $1/;
return $s;
};
@ -209,6 +211,8 @@ sub callback_dtformat {
if ($nl eq 'ja_JP') {
$s =~ s/(> )(%H)/$1%A $2/;
}
$s =~ s/^"(%B %e, )/"%a, $1/;
$s =~ s/^"(%e %B )/"%a $1/;
return $s;
};