Escape BML in /icons output.

        Patch by denise. 

diffs (26 lines):

diff -r 7515f0fa59df -r 1ed31a486b99 htdocs/allpics.bml
--- a/htdocs/allpics.bml        Mon Sep 21 05:07:59 2009 +0000
+++ b/htdocs/allpics.bml        Mon Sep 21 05:12:19 2009 +0000
@@ -98,19 +98,19 @@
 
     my %keywords = ();
     while (my ($kw, $pic) = each %{$info->{'kw'}}) {
-        LJ::text_out(\$kw);
+        LJ::text_out( BML::ebml( \$kw ) );
         push @{$keywords{$pic->{'picid'}}}, $kw;
     }
 
     my %comments = ();
     while (my ($pic, $comment) = each %{$info->{'comment'}}) {
-        LJ::text_out(\$comment);
+        LJ::text_out( BML::ebml( \$comment ) );
         $comments{$pic} = $comment;
     }
 
     my %descriptions = ();
     while ( my ($pic, $description) = each %{$info->{description}}) {
-        LJ::text_out(\$description);
+        LJ::text_out( BML::ebml( \$description ) );
         $descriptions{$pic} = $description;
     }
     
_______________________________________________
dw-changelog mailing list
[email protected]
http://lists.dwscoalition.org/mailman/listinfo/dw-changelog

Reply via email to