danf: curl-www/auto last5commits.pl,1.10,1.11
[email protected] Thu, 26 Aug 2010 21:58:59 +0000
| Newsgroups | gmane.comp.web.curl.www.cvs |
|---|---|
| Message-ID | <[email protected]> |
Update of /cvsroot/curl/curl-www/auto
In directory giant.haxx.se:/var/tmp/cvs-serv31280
Modified Files:
last5commits.pl
Log Message:
HTML-escape special characters in the description
Index: last5commits.pl
===================================================================
RCS file: /cvsroot/curl/curl-www/auto/last5commits.pl,v
retrieving revision 1.10
retrieving revision 1.11
diff -u -d -r1.10 -r1.11
--- last5commits.pl 1 Aug 2010 18:49:20 -0000 1.10
+++ last5commits.pl 26 Aug 2010 21:58:56 -0000 1.11
@@ -28,7 +28,12 @@
my $auth = $c{'Author:'};
my $desc = $c{'desc'};
my $date = $c{'Date:'};
+
$auth =~ s/<.*//g;
+
+ $desc =~ s/&/&/g;
+ $desc =~ s/\</</g;
+ $desc =~ s/\>/>/g;
$desc =~ s/ */<p>/g;
printf("<tr class=\"$cl\"><td colspan=\"2\"><b>%s</b> at <a href=\"%s/%s\">%s</a></td></tr><tr class=\"$cl\"><td>%s</td><td><pre>%s</pre></td></tr>\n",