Parent Directory
|
Revision Log
|
Patch
| revision 2726 by pabs, Wed Mar 14 02:49:35 2012 UTC | revision 2727 by geissert, Wed Mar 14 03:03:34 2012 UTC | |
|---|---|---|
| # | Line 77 untie %db; | Line 77 untie %db; |
| 77 | sub gen_html { | sub gen_html { |
| 78 | my $html = ''; | my $html = ''; |
| 79 | while (my $f = pop @files) { | while (my $f = pop @files) { |
| 80 | $f =~ s/&/&/; | $f =~ s/&/&/g; |
| 81 | $f =~ s/</</; | $f =~ s/</</g; |
| 82 | $f =~ s/>/>/; | $f =~ s/>/>/g; |
| 83 | $html .= "<a href='$f'>$f</a><br/>\n"; | $html .= "<a href='$f'>$f</a><br/>\n"; |
| 84 | } | } |
| 85 | return $html; | return $html; |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.5 |