for my $file (@files) {
if (open my $in, "<", "locale/$country/more/$file") {
local $/ = undef;
- my $code = <$file>;
+ my $code = <$in>;
eval($code);
close($in);
$self->{texts}{$_} = $self->{more_texts}{$_} for keys %{ $self->{more_texts} };
return undef if !defined $string;
+ return DateTime->today_local if lc($string) eq 'today';
+ return DateTime->today_local->subtract(days => 1) if lc($string) eq 'yesterday';
+
$params{dateformat} ||= $::myconfig{dateformat} || 'yy-mm-dd';
$params{numberformat} ||= $::myconfig{numberformat} || '1,000.00';
my $num_separator = $params{numberformat} =~ m{,\d+$} ? ',' : '.';