decode html entities

master
Joey Hess 2008-06-04 01:34:26 -04:00
parent 9976c31aca
commit 4a51e384eb
1 changed files with 3 additions and 0 deletions

View File

@ -92,6 +92,9 @@ sub index (@) { #{{{
} }
} }
$sample=~s/\n/ /g; $sample=~s/\n/ /g;
# Decode html entities in the sample since omega encodes them.
eval q{use HTML::Entities};
$sample=decode_entities($sample);
# data used by omega # data used by omega
$doc->set_data( $doc->set_data(