[dw-free] http://bugs.dwscoalition.org/show_bug.cgi?id=1643

[mark]

[commit: http://hg.dwscoalition.org/dw-free/rev/1ed31a486b99]

http://bugs.dwscoalition.org/show_bug.cgi?id=1643

Escape BML in /icons output.

Patch by denise.

Files modified:

• htdocs/allpics.bml

--------------------------------------------------------------------------------
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;
     }
     
--------------------------------------------------------------------------------