Commits

Toby Inkster committed 51496fb

This is the script to generate new %char2entity map

Comments (0)

Files changed (2)

devel.table/entities.pl

 my $data = do { local $/ = <DATA> };
+printf("\t\"\\x{%04x}\"  => \'%s\',\n", 38, '&amp;');
+printf("\t\"\\x{%04x}\"  => \'%s\',\n", 60, '&lt;');
 while ($data =~ m{ <!ENTITY \s* (\S+) \s* "(.+?)" \s* > }gix)
 {
 	my ($ent, $exp) = ("&$1;", $2);

lib/HTML/HTML5/Entities.pm

 	$HTML::HTML5::Entities::AUTHORITY = 'cpan:TOBYINK';
 }
 BEGIN {
-	$HTML::HTML5::Entities::VERSION   = '0.001';
+	$HTML::HTML5::Entities::VERSION   = '0.002';
 }
 
 our (%entity2char, %char2entity, $hex, $default_unsafe_characters, @EXPORT, @EXPORT_OK);
 		"\x{00fd}"  => '&yacute;',
 		"\x{00fe}"  => '&thorn;',
 		"\x{00ff}"  => '&yuml;',
+		"\x{0026}"  => '&amp;',
 		"\x{0022}"  => '&quot;',
+		"\x{003c}"  => '&lt;',
 		"\x{003e}"  => '&gt;',
 		"\x{0152}"  => '&OElig;',
 		"\x{0153}"  => '&oelig;',