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 2001/09/06 06:32:31 UTC
cvs commit: xml-xerces/perl/t domTest.t
jasons 01/09/05 21:32:31
Modified: perl/t domTest.t
Log:
minor direct object syntax change
Revision Changes Path
1.7 +2 -1 xml-xerces/perl/t/domTest.t
Index: domTest.t
===================================================================
RCS file: /home/cvs/xml-xerces/perl/t/domTest.t,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- domTest.t 2001/04/13 22:25:45 1.6
+++ domTest.t 2001/09/06 04:32:31 1.7
@@ -9,6 +9,7 @@
BEGIN { $| = 1; print "1..2\n"; }
END {print "not ok 1\n" unless $loaded;}
use Carp;
+# use blib;
use XML::Xerces;
use lib 't';
@@ -26,7 +27,7 @@
# (correspondingly "not ok 13") depending on the success of chunk 13
# of the test code):
-$DOM->parse( new XML::Xerces::LocalFileInputSource($PERSONAL_FILE_NAME) );
+$DOM->parse(XML::Xerces::LocalFileInputSource->new($PERSONAL_FILE_NAME));
my $doc = create_doc();
my $serialize = $doc->serialize;
result($serialize eq $PERSONAL);
---------------------------------------------------------------------
To unsubscribe, e-mail: xerces-cvs-unsubscribe@xml.apache.org
For additional commands, e-mail: xerces-cvs-help@xml.apache.org