/[webpac]/trunk/back2html.pm
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/back2html.pm

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

revision 636 by dpavlin, Tue Jan 18 17:07:14 2005 UTC revision 638 by dpavlin, Wed Jan 19 22:29:54 2005 UTC
# Line 33  sub back2html { Line 33  sub back2html {
33          # put <a href=xxx>yyyy</a> back into html          # put <a href=xxx>yyyy</a> back into html
34          sub mkurl_param($$$$) {          sub mkurl_param($$$$) {
35                  my ($a_href,$url,$text,$a_end) = @_;                  my ($a_href,$url,$text,$a_end) = @_;
36                  if ($url =~ m#\?#) {                  if ($url_params) {
37                          $url .= "&".$url_params;                          if ($url =~ m#\?#) {
38                  } else {                                  $url .= "&".$url_params;
39                          $url .= "?".$url_params;                          } else {
40                                    $url .= "?".$url_params;
41                            }
42                  }                  }
43                  return '<'.$a_href.'"'.$url.'">'.$text.'<'.$a_end.'>';                  return '<'.$a_href.'"'.$url.'">'.$text.'<'.$a_end.'>';
44          }          }

Legend:
Removed from v.636  
changed lines
  Added in v.638

  ViewVC Help
Powered by ViewVC 1.1.26