[LON-CAPA-cvs] cvs: loncom /xml LCParser.pm

[albertel]

albertel		Mon Apr  1 16:47:14 2002 EDT

  Modified files:              
    /loncom/xml	LCParser.pm 
  Log:
  - conforms to HTML-Parser 3.26
  
  
Index: loncom/xml/LCParser.pm
diff -u loncom/xml/LCParser.pm:1.1 loncom/xml/LCParser.pm:1.2
--- loncom/xml/LCParser.pm:1.1	Wed Mar 27 13:37:08 2002
+++ loncom/xml/LCParser.pm	Mon Apr  1 16:47:13 2002
@@ -1,10 +1,10 @@
 package HTML::LCParser;
 
-# $Id: LCParser.pm,v 1.1 2002/03/27 18:37:08 albertel Exp $
+# $Id: LCParser.pm,v 1.2 2002/04/01 21:47:13 albertel Exp $
 
 require HTML::PullParser;
 @ISA=qw(HTML::PullParser);
-$VERSION = sprintf("%d.%02d", q$Revision: 1.1 $ =~ /(\d+)\.(\d+)/);
+$VERSION = sprintf("%d.%02d", q$Revision: 1.2 $ =~ /(\d+)\.(\d+)/);
 
 use strict;
 use Carp ();
@@ -38,7 +38,7 @@
     my $self = $class->SUPER::new(%cnf, %ARGS) || return undef;
 
     $self->{textify} = $textify;
-    $self->encoded_entities(1);
+    $self->attr_encoded(1);
     $self;
 }
 
@@ -151,7 +151,7 @@
 it will be a filehandle of some kind.  The stream will be read() until
 EOF, but not closed.
 
-It also will turn encoded_entities on by default.
+It also will turn attr_encoded on by default.
 
 =item $p->get_token