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/&/&amp;/g;
+        $desc =~ s/\</&lt;/g;
+        $desc =~ s/\>/&gt;/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",