From: Grant M. <gr...@us...> - 2002-02-14 21:34:43
|
Update of /cvsroot/perl-xml/xml-simple/t In directory usw-pr-cvs1:/tmp/cvs-serv32363/t Modified Files: 8_Namespaces.t Log Message: - fixed broken tests for default namespace declarations Index: 8_Namespaces.t =================================================================== RCS file: /cvsroot/perl-xml/xml-simple/t/8_Namespaces.t,v retrieving revision 1.1 retrieving revision 1.2 diff -u -d -r1.1 -r1.2 --- 8_Namespaces.t 5 Feb 2002 22:13:12 -0000 1.1 +++ 8_Namespaces.t 14 Feb 2002 21:34:34 -0000 1.2 @@ -237,7 +237,7 @@ ); $expected = { - '{http://www.w3.org/2000/xmlns/}' => 'http://www.orgsoc.org/', + 'xmlns' => 'http://www.orgsoc.org/', '{http://www.orgsoc.org/}list' => { '{http://www.orgsoc.org/}member' => [ 'Tom', 'Dick', 'Larry' ] } @@ -267,7 +267,7 @@ # Check that the autogeneration of namespaces works as we expect $opt = { - '{http://www.w3.org/2000/xmlns/}' => 'http://www.orgsoc.org/', + 'xmlns' => 'http://www.orgsoc.org/', '{http://www.orgsoc.org/}list' => { '{http://www.orgsoc.org/}member' => [ 'Tom', 'Dick', 'Larry' ], '{http://www.phantom.com/}director' => [ 'Bill', 'Ben' ], |