Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Rely on XS implementation of decode_entities_old.

  • Loading branch information...
commit 21f32430182bb4c843d90e4bebd6ca09ac5ad923 1 parent 62914f6
gisle authored
Showing with 5 additions and 3 deletions.
  1. +5 −3 lib/HTML/Entities.pm
8 lib/HTML/Entities.pm
View
@@ -1,6 +1,6 @@
package HTML::Entities;
-# $Id: Entities.pm,v 1.13 1998/03/26 21:19:05 aas Exp $
+# $Id: Entities.pm,v 1.14 1999/11/08 13:27:15 gisle Exp $
=head1 NAME
@@ -73,9 +73,11 @@ require Exporter;
@EXPORT = qw(encode_entities decode_entities);
@EXPORT_OK = qw(%entity2char %char2entity);
-$VERSION = sprintf("%d.%02d", q$Revision: 1.13 $ =~ /(\d+)\.(\d+)/);
+$VERSION = sprintf("%d.%02d", q$Revision: 1.14 $ =~ /(\d+)\.(\d+)/);
sub Version { $VERSION; }
+require HTML::Parser; # for fast XS implemented decode_entities
+
%entity2char = (
# Some normal chars that have special meaning in SGML context
@@ -201,7 +203,7 @@ for (0 .. 255) {
my %subst; # compiled encoding regexps
-sub decode_entities
+sub decode_entities_old
{
my $array;
if (defined wantarray) {
Please sign in to comment.
Something went wrong with that request. Please try again.