vitalif
/
VMXTemplate
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

normalize timestamps, call utf8on when in UTF-8 mode

databind
vitalif 2009-12-18 13:04:29 +00:00 committed by Vitaliy Filippov
parent 1b3ee51874
commit 3d5f6d9f97
1 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
VMX/Template.pm
View File

@ -795,8 +795,17 @@ sub function_join { fearr('join', @_) } *function_implode = \&fu
sub function_subst { fearr('exec_subst', @_) }
# sprintf
sub function_sprintf { fearr('sprintf', @_) }
# strftime
sub function_strftime { "POSIX::strftime($_[1], localtime(($_[2]) || undef))" }
sub function_strftime
{
my $self = shift;
my $e = $_[1];
$e = "($e).' '.($_[2])" if $_[2];
$e = "POSIX::strftime($_[0], localtime(timestamp($e))";
$e = "utf8on($e)" if $self->{use_utf8};
return $e;
}
# выполняет подстановку function_subst
sub exec_subst