/[webpac2]/trunk/web/browse.cgi
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/web/browse.cgi

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 67 by dpavlin, Wed Nov 16 15:33:12 2005 UTC revision 70 by dpavlin, Sat Nov 19 23:48:24 2005 UTC
# Line 54  sub update_file($$) { Line 54  sub update_file($$) {
54                  return $iconv_loc->convert(chr(hex($t)));                  return $iconv_loc->convert(chr(hex($t)));
55          }          }
56          $content =~ s/%u([a-fA-F0-9]{4})/_conv_js($1)/gex;          $content =~ s/%u([a-fA-F0-9]{4})/_conv_js($1)/gex;
57            $content =~ s/^[\n\r]+//s;
58          $content =~ s/[\n\r]+$//s;          $content =~ s/[\n\r]+$//s;
59    
60          write_file($path . '.new', $content) || die "can't save ${path}.new $!";          write_file($path . '.new', $content) || die "can't save ${path}.new $!";
# Line 75  sub get_file_in_html($) { Line 76  sub get_file_in_html($) {
76    
77  if ($q->path_info =~ m#xml#) {  if ($q->path_info =~ m#xml#) {
78    
79          my @ds = $db->load_ds($rec);          my $ds = $db->load_ds($rec);
80    
81          if (@ds && $#ds > 0) {          if ($ds) {
82                  print qq{<response>                  print qq{<response>
83  <action type='html' target='div_record' errorCode='' errorMessage='' >  <action type='html' target='div_record' errorCode='' errorMessage='' >
84                  }, $iconv_utf8->convert( $out->apply(                  }, $iconv_utf8->convert( $out->apply(
85                          template => $template_file,                          template => $template_file,
86                          data => \@ds,                          data => $ds,
87                  ) ), qq{                  ) ), qq{
88    
89  </action>  </action>
Legend:
Removed from v.67  
changed lines
  Added in v.70
  ViewVC Help
Powered by ViewVC 1.1.26