You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@xerces.apache.org by ja...@apache.org on 2002/02/21 03:55:53 UTC

cvs commit: xml-xerces/perl/samples SAX2Count.pl

jasons      02/02/20 18:55:53

  Modified:    perl/samples SAX2Count.pl
  Log:
  	* samples/SAX2Count.pl (Repository):
  	made end_element() more verbose to demonstrate what would really
  	   be returned
  
  Revision  Changes    Path
  1.8       +2 -2      xml-xerces/perl/samples/SAX2Count.pl
  
  Index: SAX2Count.pl
  ===================================================================
  RCS file: /home/cvs/xml-xerces/perl/samples/SAX2Count.pl,v
  retrieving revision 1.7
  retrieving revision 1.8
  diff -u -r1.7 -r1.8
  --- SAX2Count.pl	10 Oct 2001 20:08:58 -0000	1.7
  +++ SAX2Count.pl	21 Feb 2002 02:55:53 -0000	1.8
  @@ -83,7 +83,7 @@
     * = Default if not provided explicitly
   
   EOU
  -my $VERSION = q[$Id: SAX2Count.pl,v 1.7 2001/10/10 20:08:58 jasons Exp $ ];
  +my $VERSION = q[$Id: SAX2Count.pl,v 1.8 2002/02/21 02:55:53 jasons Exp $ ];
   
   my %OPTIONS;
   my $rc = GetOptions(\%OPTIONS,
  @@ -127,7 +127,7 @@
     $self->{attrs} += $attrs->getLength;
   }
   sub end_element {
  -  my ($self,$name) = @_;
  +  my ($self,$uri,$localname,$qname) = @_;
   }
   sub characters {
     my ($self,$str,$len) = @_;
  
  
  

---------------------------------------------------------------------
To unsubscribe, e-mail: xerces-cvs-unsubscribe@xml.apache.org
For additional commands, e-mail: xerces-cvs-help@xml.apache.org