--- trunk/web/browse.cgi 2005/11/15 14:30:11 57 +++ trunk/web/browse.cgi 2005/11/15 14:30:26 58 @@ -48,10 +48,10 @@ if (@ds && $#ds > 0) { print qq{ - }, $out->apply( + }, $iconv_utf8->convert( $out->apply( template => $template, data => \@ds, - ), qq{ + ) ), qq{ @@ -88,9 +88,15 @@ if ($q->param('save_template')) { - my $tmpl = $q->param('tt_template') || die "no template?"; + my $tmpl = $iconv_loc->convert( $q->param('tt_template') ) || die "no template?"; + sub _conv_js { + my $t = shift || return; + return $iconv_loc->convert(chr(hex($t))); + } + $tmpl =~ s/%u([a-fA-F0-9]{4})/_conv_js($1)/gex; + my $tmpl_file = $out->{'include_path'} . '/' . $template; - write_file($tmpl_file . '.new', $iconv_loc->convert($tmpl)) || die "can't save $tmpl_file: $!"; + write_file($tmpl_file . '.new', $tmpl) || die "can't save $tmpl_file: $!"; rename $tmpl_file . '.new', $tmpl_file || die "can't rename to $tmpl_file: $!"; print qq{