You can subscribe to this list here.
2002 |
Jan
(8) |
Feb
(22) |
Mar
(3) |
Apr
(13) |
May
(1) |
Jun
(4) |
Jul
|
Aug
(5) |
Sep
(9) |
Oct
(36) |
Nov
(7) |
Dec
(15) |
---|---|---|---|---|---|---|---|---|---|---|---|---|
2003 |
Jan
(4) |
Feb
(1) |
Mar
(55) |
Apr
(25) |
May
(25) |
Jun
(4) |
Jul
(2) |
Aug
|
Sep
(12) |
Oct
(6) |
Nov
(14) |
Dec
(1) |
2004 |
Jan
(1) |
Feb
(8) |
Mar
(6) |
Apr
(5) |
May
|
Jun
|
Jul
|
Aug
(1) |
Sep
(1) |
Oct
(3) |
Nov
(11) |
Dec
|
2005 |
Jan
(14) |
Feb
(3) |
Mar
(4) |
Apr
(14) |
May
(1) |
Jun
|
Jul
(1) |
Aug
|
Sep
(1) |
Oct
(2) |
Nov
(2) |
Dec
(1) |
2006 |
Jan
|
Feb
|
Mar
|
Apr
(3) |
May
|
Jun
|
Jul
|
Aug
(1) |
Sep
(8) |
Oct
(19) |
Nov
(5) |
Dec
|
2007 |
Jan
(5) |
Feb
(1) |
Mar
|
Apr
(4) |
May
|
Jun
|
Jul
|
Aug
(8) |
Sep
|
Oct
|
Nov
|
Dec
|
2008 |
Jan
|
Feb
|
Mar
(2) |
Apr
|
May
|
Jun
|
Jul
(1) |
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
From: Grant M. <gr...@us...> - 2006-09-19 08:33:36
|
Update of /cvsroot/perl-xml/xml-simple In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13036 Modified Files: Changes Log Message: - fix behaviour of XMLout() with undef in arrayref and SuppressEmpty enabled Index: Changes =================================================================== RCS file: /cvsroot/perl-xml/xml-simple/Changes,v retrieving revision 1.20 retrieving revision 1.21 diff -u -d -r1.20 -r1.21 --- Changes 28 Apr 2006 22:43:36 -0000 1.20 +++ Changes 19 Sep 2006 08:33:30 -0000 1.21 @@ -1,7 +1,9 @@ Revision history for Perl module XML::Simple -2.15 ??? ?? 2006 +2.15 Sep ?? 2006 - allow '.' characters in variable names (suggested by Cosimo Streppone) + - fix output of undefs in arrayrefs with SuppressEmpty (reported by + ãã㪠- Kanna) 2.14 Jan 29 2005 - unlink and lock fixes for VMS (patch from Peter (Stig) Edwards) |
From: Grant M. <gr...@us...> - 2006-09-19 08:33:36
|
Update of /cvsroot/perl-xml/xml-simple/t In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13036/t Modified Files: 2_XMLout.t Log Message: - fix behaviour of XMLout() with undef in arrayref and SuppressEmpty enabled Index: 2_XMLout.t =================================================================== RCS file: /cvsroot/perl-xml/xml-simple/t/2_XMLout.t,v retrieving revision 1.14 retrieving revision 1.15 diff -u -d -r1.14 -r1.15 --- 2_XMLout.t 17 Nov 2004 08:36:49 -0000 1.14 +++ 2_XMLout.t 19 Sep 2006 08:33:30 -0000 1.15 @@ -7,7 +7,7 @@ $^W = 1; -plan tests => 196; +plan tests => 198; ############################################################################## @@ -687,6 +687,34 @@ 'uninitialiased values successfully skipped'); +# Try undef in an array + +$ref = { a => [ 'one', undef, 'three' ] }; +$_ = XMLout($ref); +like($_, + qr{ + ^\s*<(\w*)\s*> + \s*<a\s*>one</a\s*> + \s*<a\s*></a\s*> + \s*<a\s*>three</a\s*> + \s*</\1\s*>\s*$ + }xs, + 'uninitialiased value in array is empty element'); + + +# And again with SuppressEmpty enabled + +$_ = XMLout($ref, SuppressEmpty => 1); +like($_, + qr{ + ^\s*<(\w*)\s*> + \s*<a\s*>one</a\s*> + \s*<a\s*>three</a\s*> + \s*</\1\s*>\s*$ + }xs, + 'uninitialiased value in array is skipped'); + + # Test the keeproot option $ref = { |
From: Grant M. <gr...@us...> - 2006-09-19 08:33:36
|
Update of /cvsroot/perl-xml/xml-simple/lib/XML In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13036/lib/XML Modified Files: Simple.pm Log Message: - fix behaviour of XMLout() with undef in arrayref and SuppressEmpty enabled Index: Simple.pm =================================================================== RCS file: /cvsroot/perl-xml/xml-simple/lib/XML/Simple.pm,v retrieving revision 1.24 retrieving revision 1.25 diff -u -d -r1.24 -r1.25 --- Simple.pm 28 Apr 2006 22:43:36 -0000 1.24 +++ Simple.pm 19 Sep 2006 08:33:30 -0000 1.25 @@ -1457,6 +1457,7 @@ elsif(UNIVERSAL::isa($ref, 'ARRAY')) { foreach $value (@$ref) { + next if !defined($value) and $self->{opt}->{suppressempty}; if(!ref($value)) { push @result, $indent, '<', $name, '>', |
From: Petr P. <pa...@us...> - 2006-08-26 17:05:40
|
Update of /cvsroot/perl-xml/XML-LibXML-Common In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12709 Modified Files: Common.xs Log Message: - compilation warnings addressed (#8786) - "undeclared va_list" build problem on Solaris hopefully fixed (#6352) Index: Common.xs =================================================================== RCS file: /cvsroot/perl-xml/XML-LibXML-Common/Common.xs,v retrieving revision 1.7 retrieving revision 1.8 diff -u -d -r1.7 -r1.8 --- Common.xs 30 May 2003 18:39:22 -0000 1.7 +++ Common.xs 26 Aug 2006 17:05:36 -0000 1.8 @@ -8,6 +8,7 @@ #include "XSUB.h" #include "ppport.h" +#include <stdarg.h> #include <libxml/parser.h> /* #include <libxml/tree.h> */ @@ -55,7 +56,7 @@ xmlBufferPtr in = NULL, out = NULL; xmlCharEncodingHandlerPtr coder = NULL; CODE: - realstring = SvPV(string, len); + realstring = (xmlChar *) SvPV(string, len); if ( realstring != NULL ) { /* warn("encode %s", realstring ); */ #ifdef HAVE_UTF8 @@ -97,7 +98,7 @@ in = xmlBufferCreate(); out = xmlBufferCreate(); - xmlBufferCCat( in, realstring ); + xmlBufferCCat( in, (char *) realstring ); if ( xmlCharEncInFunc( coder, out, in ) >= 0 ) { tstr = xmlStrdup( out->content ); } @@ -152,7 +153,7 @@ } else { #endif - realstring = SvPV(string, len); + realstring = (xmlChar *) SvPV(string, len); if ( realstring != NULL ) { /* warn("decode %s", realstring ); */ enc = xmlParseCharEncoding( encoding ); @@ -190,10 +191,10 @@ in = xmlBufferCreate(); out = xmlBufferCreate(); - xmlBufferCCat( in, realstring ); + xmlBufferCCat( in, (char *) realstring ); if ( xmlCharEncOutFunc( coder, out, in ) >= 0 ) { len = xmlBufferLength( out ); - tstr = xmlCharStrndup( xmlBufferContent( out ), len ); + tstr = xmlCharStrndup( (char *) xmlBufferContent( out ), len ); } xmlBufferFree( in ); |
From: Grant M. <gr...@us...> - 2006-04-28 22:43:42
|
Update of /cvsroot/perl-xml/xml-simple/t In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv27603/t Modified Files: 1_XMLin.t Log Message: - allow '.' characters in variable names Index: 1_XMLin.t =================================================================== RCS file: /cvsroot/perl-xml/xml-simple/t/1_XMLin.t,v retrieving revision 1.22 retrieving revision 1.23 diff -u -d -r1.22 -r1.23 --- 1_XMLin.t 29 Jan 2005 04:17:42 -0000 1.22 +++ 1_XMLin.t 28 Apr 2006 22:43:36 -0000 1.23 @@ -1088,10 +1088,14 @@ <dir xsvar="conf_dir">/etc</dir> <dir xsvar="log_dir">/var/log</dir> <cfg xsvar="have_docs">false</cfg> + <cfg xsvar="host.domain">search.perl.org</cfg> + <cfg xsvar="bad/name">bogus</cfg> <file name="config_file">${conf_dir}/appname.conf</file> <file name="log_file">${log_dir}/appname.log</file> <file name="debug_file">${log_dir}/appname.dbg</file> + <file name="bogus_file">${bad/name}</file> <opt docs="${have_docs}" /> + <site url="http://${host.domain}/" /> </opt>); $opt = XMLin($xml, contentkey => '-content', varattr => 'xsvar'); @@ -1100,13 +1104,19 @@ config_file => '/etc/appname.conf', log_file => '/var/log/appname.log', debug_file => '/var/log/appname.dbg', + bogus_file => '${bad/name}', # '/' is not valid in a var name }, - opt => { docs => 'false' }, + opt => { docs => 'false' }, + site => { url => 'http://search.perl.org/' }, dir => [ { xsvar => 'conf_dir', content => '/etc' }, { xsvar => 'log_dir', content => '/var/log' }, ], - cfg => { xsvar => 'have_docs', content => 'false' }, + cfg => [ + { xsvar => 'have_docs', content => 'false' }, + { xsvar => 'host.domain', content => 'search.perl.org' }, + { xsvar => 'bad/name', content => 'bogus' }, + ], }, 'variables defined in XML work'); |
From: Grant M. <gr...@us...> - 2006-04-28 22:43:42
|
Update of /cvsroot/perl-xml/xml-simple/lib/XML In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv27603/lib/XML Modified Files: Simple.pm Log Message: - allow '.' characters in variable names Index: Simple.pm =================================================================== RCS file: /cvsroot/perl-xml/xml-simple/lib/XML/Simple.pm,v retrieving revision 1.23 retrieving revision 1.24 diff -u -d -r1.23 -r1.24 --- Simple.pm 29 Jan 2005 04:16:10 -0000 1.23 +++ Simple.pm 28 Apr 2006 22:43:36 -0000 1.24 @@ -894,7 +894,7 @@ if(my $var = $self->{_var_values}) { while(my($key, $val) = each(%$attr)) { - $val =~ s{\$\{(\w+)\}}{ $self->get_var($1) }ge; + $val =~ s{\$\{([\w.]+)\}}{ $self->get_var($1) }ge; $attr->{$key} = $val; } } @@ -2540,6 +2540,8 @@ value or in the text content of an element. If 'name' matches a key in the supplied hashref, C<${name}> will be replaced with the corresponding value from the hashref. If no matching key is found, the variable will not be replaced. +Names must match the regex: C<[\w.]+> (ie: only 'word' characters and dots are +allowed). =head2 VarAttr => 'attr_name' I<# in - handy> |
From: Grant M. <gr...@us...> - 2006-04-28 22:43:42
|
Update of /cvsroot/perl-xml/xml-simple In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv27603 Modified Files: Changes Log Message: - allow '.' characters in variable names Index: Changes =================================================================== RCS file: /cvsroot/perl-xml/xml-simple/Changes,v retrieving revision 1.19 retrieving revision 1.20 diff -u -d -r1.19 -r1.20 --- Changes 29 Jan 2005 04:22:10 -0000 1.19 +++ Changes 28 Apr 2006 22:43:36 -0000 1.20 @@ -1,5 +1,8 @@ Revision history for Perl module XML::Simple +2.15 ??? ?? 2006 + - allow '.' characters in variable names (suggested by Cosimo Streppone) + 2.14 Jan 29 2005 - unlink and lock fixes for VMS (patch from Peter (Stig) Edwards) |
From: Grant M. <gr...@us...> - 2005-12-12 08:13:10
|
Update of /cvsroot/perl-xml/perl-xml-faq In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8877 Modified Files: perl-xml-faq.xml Log Message: - update Glade XML reference to correct module Index: perl-xml-faq.xml =================================================================== RCS file: /cvsroot/perl-xml/perl-xml-faq/perl-xml-faq.xml,v retrieving revision 1.21 retrieving revision 1.22 diff -u -d -r1.21 -r1.22 --- perl-xml-faq.xml 2 Nov 2005 09:03:03 -0000 1.21 +++ perl-xml-faq.xml 12 Dec 2005 08:13:00 -0000 1.22 @@ -197,10 +197,12 @@ is a serious piece of work).</para></listitem> <listitem><para>Perhaps you've played around with the Glade GUI builder - and discovered it uses XML to store the interface definitions. Well - the <classname>Glade::Perl</classname> module already knows how to - read those files and turn them into working Perl code. - </para></listitem> + and discovered it uses XML to store the interface definitions. The + <classname>Gtk2::GladeXML</classname> module already knows how to + read those files and turn them into a working GUI with only a few + lines of Perl code (see <ulink + url="http://live.gnome.org/GTK2-Perl/GladeXML/Tutorial">this + article</ulink> for an intro).</para></listitem> <listitem><para>Maybe you've had the brilliant idea that you could serialise your Perl objects to XML format to support your new killer RPC |
From: Grant M. <gr...@us...> - 2005-11-02 09:03:20
|
Update of /cvsroot/perl-xml/perl-xml-faq In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4540 Modified Files: perl-xml-faq.xml Log Message: - integrate tip from Dan Horne re schema validation using XML::LibXML Index: perl-xml-faq.xml =================================================================== RCS file: /cvsroot/perl-xml/perl-xml-faq/perl-xml-faq.xml,v retrieving revision 1.20 retrieving revision 1.21 diff -u -d -r1.20 -r1.21 --- perl-xml-faq.xml 11 Feb 2005 08:06:16 -0000 1.20 +++ perl-xml-faq.xml 2 Nov 2005 09:03:03 -0000 1.21 @@ -1829,6 +1829,48 @@ </answer> </qandaentry> + <qandaentry id="validation_libxml_xsd"> + <question> + <para>W3C Schema Validation With <classname>XML::LibXML</classname></para> + </question> + <answer> + + <para><classname>XML::LibXML</classname> provides undocumented support + for validating against a W3C schema. Here's an example of how you might + use it (contributed by Dan Horne):</para> + + <programlisting><![CDATA[ +use XML::LibXML; + +my $schema_file = 'po.xsd'; +my $document = 'po.xml'; + +my $schema = XML::LibXML::Schema->new(location => $schema_file); + +my $parser = XML::LibXML->new; +my $doc = $parser->parse_file($document); + +eval { $schema->validate($doc) }; +die $@ if $@; + +print "$document validated successfully\n"; + ]]></programlisting> + + <para>The referenced XSD schema file and sample XML document can be + downloaded from the <ulink url="http://www.w3.org/TR/xmlschema-0/">W3C + Schema Primer</ulink>.</para> + + <para>The xmllint command line validator included in the libxml2 + distribution can also do W3C schema validation. You can use it like + this:</para> + + <programlisting><![CDATA[ +xmllint --noout --schema po.xsd po.xml + ]]></programlisting> + + </answer> + </qandaentry> + <qandaentry id="validation_xerces"> <question> <para>W3C Schema Validation With <classname>XML::Xerces</classname></para> @@ -1852,7 +1894,24 @@ <para>Sam Tregar's <classname>XML::Validator::Schema</classname> allows you to validate XML documents against a W3C XML Schema. It does not implement the full W3C XML Schema recommendation, but a useful - subset.</para> + subset. Here's an example:</para> + + <programlisting><![CDATA[ +use XML::SAX::ParserFactory; +use XML::Validator::Schema; + +my $schema_file = 'po.xsd'; +my $document = 'po.xml'; + +my $validator = XML::Validator::Schema->new(file => $schema_file); + +my $parser = XML::SAX::ParserFactory->parser(Handler => $validator); + +eval { $parser->parse_uri($document); }; +die $@ if $@; + +print "$document validated successfully\n"; + ]]></programlisting> </answer> </qandaentry> |
From: Grant M. <gr...@us...> - 2005-11-02 09:01:41
|
Update of /cvsroot/perl-xml/perl-xml-faq In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4097 Added Files: generate.sh Log Message: - commands used to validate source document and produce HTML --- NEW FILE: generate.sh --- #!/bin/sh echo "Validating perl-xml-faq.xml" xmllint --noout --valid perl-xml-faq.xml || exit; echo OK; echo echo "Generating index.html" xsltproc faq-style.xsl perl-xml-faq.xml > index.html || exit echo done; echo |
From: Petr P. <pa...@us...> - 2005-10-20 17:09:17
|
Update of /cvsroot/perl-xml/XML-LibXML-XPathContext In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28704 Modified Files: Changes Log Message: added changes for 0.07 Index: Changes =================================================================== RCS file: /cvsroot/perl-xml/XML-LibXML-XPathContext/Changes,v retrieving revision 1.14 retrieving revision 1.15 diff -u -d -r1.14 -r1.15 --- Changes 10 Nov 2003 10:10:25 -0000 1.14 +++ Changes 20 Oct 2005 17:08:59 -0000 1.15 @@ -2,6 +2,11 @@ Revision history for Perl module XML::LibXML::XPathContext. +0.07 Thu Oct 20 2005 + +* fixed compilation problems with gcc4 and some other compilers + (lvalue cast in XPathContext.xs) + 0.06 Mon Nov 10 2003 * simplified variable lookup code to use a C structure instead of |
From: Petr P. <pa...@us...> - 2005-10-20 16:56:18
|
Update of /cvsroot/perl-xml/XML-LibXML-XPathContext In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23348 Modified Files: XPathContext.pm Log Message: about to release 0.07 Index: XPathContext.pm =================================================================== RCS file: /cvsroot/perl-xml/XML-LibXML-XPathContext/XPathContext.pm,v retrieving revision 1.32 retrieving revision 1.33 diff -u -d -r1.32 -r1.33 --- XPathContext.pm 10 Nov 2003 10:09:12 -0000 1.32 +++ XPathContext.pm 20 Oct 2005 16:56:09 -0000 1.33 @@ -7,7 +7,7 @@ use XML::LibXML::NodeList; -$VERSION = '0.06'; +$VERSION = '0.07'; require DynaLoader; @ISA = qw(DynaLoader); |
From: Petr C. <pci...@us...> - 2005-09-23 11:43:56
|
Update of /cvsroot/perl-xml/sax-perl-org In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24783 Modified Files: index.html perl-sax.css sax-2.1-adv.html sax-2.1-idx.html sax-2.1.html Log Message: Index: index.html =================================================================== RCS file: /cvsroot/perl-xml/sax-perl-org/index.html,v retrieving revision 1.7 retrieving revision 1.8 diff -u -d -r1.7 -r1.8 --- index.html 4 May 2005 09:17:03 -0000 1.7 +++ index.html 23 Sep 2005 11:43:48 -0000 1.8 @@ -7,26 +7,42 @@ </head> <body> <div class="Header"> - <div class="Title">Perl SAX (Simple API for XML) Page</div> - This is the current Perl SAX page. The former official + <div class="Title">Perl SAX</div> + Simple Perl API for XML Processing + </div> + <div class="LeftBox"> + <div> + This is the official Perl SAX page. The former <a href="http://perl-xml.sourceforge.net/sax/">Perl SAX page</a> is no more - maintained for various reasons. - Perl SAX is a part of + maintained. Perl SAX is a part of the <a href="http://perl-xml.sourceforge.net/">Perl XML Project</a> - hosted by <a href="http://www.sourceforge.net/">Sourceforge</a>. + hosted by <a + href="http://www.sourceforge.net/">Sourceforge</a>. + Use the <i>per...@li...</i> mailing list to + discuss Perl SAX. </div> - <div class="LeftBox"> <div> + Perl SAX is a common parser interface for XML + parsers. It allows to write applications that use XML parsers, + but are independent of which parser is actually used. In + contrast with Java, Perl SAX is not fully defined by a code + distribution. The interface is described with the + <a href="sax-2.1-ref.html">specification</a>. However, there exists + <a href="http://www.cpan.org/modules/by-module/XML/XML-SAX-0.12.tar.gz">XML::SAX</a> package providing base classes, a fall-back + parser, etc. Make sure to employ this package when you are using + Perl SAX. + </div> + <div class="info"> <div class="SubTitle">Perl SAX 2.1</div> The current stable version is 2.1: <ul> - <li><a href="sax-2.1-ref.html"><b>Perl SAX 2.1 Reference</b></a> (an indexed view of the two following docs)</li> + <li><a href="sax-2.1-ref.html">Perl SAX 2.1 Reference</a> (an indexed view of the two following docs)</li> <li><a href="sax-2.1.html">Perl SAX 2.1 Binding</a></li> <li><a href="sax-2.1-adv.html">Perl SAX 2.1 Advanced</a></li> <li><a href="changes-2.1.html">Changes and Issues</a></li> <ul> </div> - <div> + <div class="info"> <div class="SubTitle">Perl SAX 2.0</div> The previous version of Perl SAX was 2.0. The 2.0 API is defined by the following documents: @@ -37,14 +53,14 @@ SAX 2.0 Advanced</a></li> </ul> </div> - <div> - <div class="SubTitle">Related Pages</div> - <ul> - <li><a href="http://www.saxproject.org/">Official SAX Page</a></li> - </ul> - </div> </div> <div class="RightBox"> + <div class="SubTitle">Related Pages</div> + + <div class="Article"> + <a href="http://www.saxproject.org/">Official (Java) SAX Page</a> + </div> + <div class="SubTitle">Recommended Reading</div> <div class="Article"> Index: perl-sax.css =================================================================== RCS file: /cvsroot/perl-xml/sax-perl-org/perl-sax.css,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- perl-sax.css 4 May 2005 09:17:03 -0000 1.2 +++ perl-sax.css 23 Sep 2005 11:43:48 -0000 1.3 @@ -1,21 +1,25 @@ -BODY { - font-size: 11pt; - color: #173c82; +body { + font-size: 80%; + color: #666666; + font-family: Verdana, Arial, Sans-Serif; } -DIV { - padding: 5px 5px 5px 20px; +div { + padding: 5px 5px 5px 10px; margin: 0px 0px 5px 0px; - border: 1px solid #173c82; + /*border: 1px solid #173c82;*/ } -UL { +ul { margin: 0px 0px 0px 0px; } +a { + color: #0066cc; +} + DIV.LeftBox, DIV.RightBox { padding: 0px 0px 0px 0px; - border: none; } DIV.LeftBox { @@ -23,6 +27,12 @@ width: 65%; } +div.info { + background-color: #bbffbb; + margin-top: 8px; + padding-bottom: 8px; +} + DIV.RightBox { padding-top: 5px; float: right; @@ -30,22 +40,27 @@ } DIV.Header { - background-color: #dce4ec; + background-color: #5a9dd4; + text-align: center; + padding: 5px 5px 10px 5px; + color: #ffffff; } DIV.Title { - font-size: 20pt; - padding: 0px 0px 5px 0px; - border: none; + font-size: 25pt; + font-weight: bold; + padding: 0px 0px 0px 0px; } DIV.SubTitle { - font-size: 14pt; + font-size: 12pt; + font-weight: bold; padding: 0px 0px 0px 0px; + margin: 10px 0px 1px 0px; border: none; } DIV.Article { - padding: 3px 5px 1px 5px; - border: none; + padding: 1px 0px 1px 5px; + margin: 2px 0px 3px 0px; } Index: sax-2.1-adv.html =================================================================== RCS file: /cvsroot/perl-xml/sax-perl-org/sax-2.1-adv.html,v retrieving revision 1.8 retrieving revision 1.9 diff -u -d -r1.8 -r1.9 --- sax-2.1-adv.html 4 May 2005 09:17:03 -0000 1.8 +++ sax-2.1-adv.html 23 Sep 2005 11:43:48 -0000 1.9 @@ -630,7 +630,7 @@ <tr><td class="prop">Type</td> <td>A string representing the attribute type.</td></tr> <tr><td class="prop">Mode</td> -<td>A string representing the attribute mode ("<tt>#IMPLIED</tt>", +<td>A string representing the attribute defaulting mode ("<tt>#IMPLIED</tt>", "<tt>#REQUIRED</tt>", or "<tt>#FIXED</tt>") or undef if none of these applies.</td></tr> <tr><td class="prop">Value</td> Index: sax-2.1-idx.html =================================================================== RCS file: /cvsroot/perl-xml/sax-perl-org/sax-2.1-idx.html,v retrieving revision 1.9 retrieving revision 1.10 diff -u -d -r1.9 -r1.10 --- sax-2.1-idx.html 4 May 2005 09:17:03 -0000 1.9 +++ sax-2.1-idx.html 23 Sep 2005 11:43:48 -0000 1.10 @@ -20,7 +20,7 @@ <div class="box"> <div class="title">Perl SAX 2.1</div> <div class="right">[<a target="_top" href="http://perl-xml.sourceforge.net/perl-sax/">home</a>]</div> - <div class="subtitle">Revision: 2005-05-04</div> + <div class="subtitle">Revision: 2005-09-23</div> <div class="item"> <a href="sax-2.1.html" target="cnt">Introduction</a> </div> Index: sax-2.1.html =================================================================== RCS file: /cvsroot/perl-xml/sax-perl-org/sax-2.1.html,v retrieving revision 1.7 retrieving revision 1.8 diff -u -d -r1.7 -r1.8 --- sax-2.1.html 15 Mar 2005 16:11:44 -0000 1.7 +++ sax-2.1.html 23 Sep 2005 11:43:48 -0000 1.8 @@ -7,8 +7,8 @@ <h1>Perl SAX 2.1 Binding</h1> -<p>SAX (Simple API for XML) is a common parser interface for XML -parsers. It allows application writers to write applications that use +<p>Perl SAX (Simple API for XML) is a common parser interface for XML +parsers. It allows application writers to write applications that use XML parsers, but are independent of which parser is actually used.</p> <p>This document describes the version of SAX used by Perl modules. |
From: my n. <dea...@ya...> - 2005-07-15 21:30:49
|
Hello, I hope this is correct forum. It seems that the module can NOT work with the 64 bit enabled ( compiled ) PERL. On the other side, i have to have it 64 bit - or DBD to Oracle won't work. Here is the errors : $ perl Makefile.PL PREFIX=$HOME/perl/modules enable native perl UTF8 running xml2-config... ok looking for -lxml2... yes Checking if your kit is complete... Looks good Writing Makefile for XML::LibXML::Common $ make cp Common.pm blib/lib/XML/LibXML/Common.pm /home/username/perl/bin/perl -e 'use ExtUtils::Mksymlists; Mksymlists("NAME" => "XML::LibXML::Common", "DL_FUNCS" => { }, "FUNCLIST" => [], "DL_VARS" => []);' /home/username/perl/bin/perl /home/username/perl/lib/5.8.7/ExtUtils/xsubpp -typemap /home/username/perl/lib/5.8.7/ExtUtils/typemap -typemap typemap Common.xs > Common.xsc && mv Common.xsc Common.c cc_r -c -I/usr/local/include/libxml2 -D_ALL_SOURCE -D_ANSI_C_SOURCE -D_POSIX_SOURCE -qmaxmem=-1 -qnoansialias -DUSE_NATIVE_DLOPEN -DNEED_PTHREAD_INIT -I/usr/local/include -q64 -DUSE_64_BIT_ALL -q64 -O -DVERSION=\"0.13\" -DXS_VERSION=\"0.13\" "-I/home/username/perl/lib/5.8.7/aix-thread-multi-64all/CORE" -DHAVE_UTF8 -DHAVE_BLANK Common.c Running Mkbootstrap for XML::LibXML::Common () chmod 644 Common.bs rm -f blib/arch/auto/XML/LibXML/Common/Common.so LD_RUN_PATH="" ld -b64 -bhalt:4 -bexpall -G -bnoentry -lpthreads -lc -L/usr/local/lib Common.o -o blib/arch/auto/XML/LibXML/Common/Common.so -L/usr/local/lib -lxml2 -lpthread -liconv -lm -lz chmod 755 blib/arch/auto/XML/LibXML/Common/Common.so cp Common.bs blib/arch/auto/XML/LibXML/Common/Common.bs chmod 644 blib/arch/auto/XML/LibXML/Common/Common.bs Manifying blib/man3/XML::LibXML::Common.3 $ make test PERL_DL_NONLAZY=1 /home/username/perl/bin/perl "-Iblib/lib" "-Iblib/arch" test.pl 1..8 # Running under perl version 5.008007 for aix # Current time local: Fri Jul 15 16:54:16 2005 # Current time GMT: Fri Jul 15 20:54:16 2005 # Using Test.pm version 1.25 Can't load 'blib/arch/auto/XML/LibXML/Common/Common.so' for module XML::LibXML::Common: A file or directory in the path name does not exist. at /home/username/perl/lib/5.8.7/aix-thread-multi-64all/DynaLoader.pm line 230. at test.pl line 10 Compilation failed in require at test.pl line 10. BEGIN failed--compilation aborted at test.pl line 10. make: 1254-004 The error code from the last command is 2. Stop. $ which perl /home/username/perl/bin/perl $ perl -v This is perl, v5.8.7 built for aix-thread-multi-64all Copyright 1987-2005, Larry Wall Perl may be copied only under the terms of either the Artistic License or the GNU General Public License, which may be found in the Perl 5 source kit. Complete documentation for Perl, including FAQ lists, should be found on this system using `man perl' or `perldoc perl'. If you have access to the Internet, point your browser at http://www.perl.org/, the Perl Home Page. $ perl -V Summary of my perl5 (revision 5 version 8 subversion 7) configuration: Platform: osname=aix, osvers=5.2.0.0, archname=aix-thread-multi-64all uname='aix sacwis200 2 5 00081bcc4c00 ' config_args='-Dcc=cc_r -Dusethreads -Duse64bitall -Dprefix=/home/username/perl -de' hint=recommended, useposix=true, d_sigaction=define usethreads=define use5005threads=undef useithreads=define usemultiplicity=define useperlio=define d_sfio=undef uselargefiles=define usesocks=undef use64bitint=define use64bitall=define uselongdouble=undef usemymalloc=n, bincompat5005=undef Compiler: cc='cc_r', ccflags ='-D_ALL_SOURCE -D_ANSI_C_SOURCE -D_POSIX_SOURCE -qmaxmem=-1 -qnoansialias -DUSE_NATIVE_DLOPEN -DNEED_PTHREAD_INIT -I/usr/local/include -q64 -DUSE_64_BIT_ALL -q64', optimize='-O', cppflags='-D_ALL_SOURCE -D_ANSI_C_SOURCE -D_POSIX_SOURCE -qmaxmem=-1 -qnoansialias -DUSE_NATIVE_DLOPEN -DNEED_PTHREAD_INIT -I/usr/local/include' ccversion='6.0.0.0', gccversion='', gccosandvers='' intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=87654321 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=8 ivtype='long long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8 alignbytes=8, prototype=define Linker and Libraries: ld='ld', ldflags ='-brtl -bdynamic -bmaxdata:0x80000000 -L/usr/local/lib -q64 -b64' libpth=/usr/local/lib /lib /usr/lib /usr/ccs/lib libs=-lbind -lnsl -ldbm -ldl -lld -lm -lcrypt -lpthreads -lc -lbsd perllibs=-lbind -lnsl -ldl -lld -lm -lcrypt -lpthreads -lc -lbsd libc=/lib/libc.a, so=a, useshrplib=false, libperl=libperl.a gnulibc_version='' Dynamic Linking: dlsrc=dl_aix.xs, dlext=so, d_dlsymun=undef, ccdlflags=' -bE:/home/username/perl/lib/5.8.7/aix-thread-multi-64all/CORE/perl.exp' cccdlflags=' ', lddlflags='-b64 -bhalt:4 -bexpall -G -bnoentry -lpthreads -lc -L/usr/local/lib' Characteristics of this binary (from libperl): Compile-time options: MULTIPLICITY USE_ITHREADS USE_64_BIT_INT USE_64_BIT_ALL USE_LARGE_FILES PERL_IMPLICIT_CONTEXT Built under aix Compiled at Jul 15 2005 16:16:51 %ENV: PERL5LIB="/home/username/perl/lib/perl5:/home/username/perl/modules:/home/username/perl/modules/lib/site_perl/5.8.7:/home/username/perl/lib:/home/username/perl/lib/perl5/site_perl/5.8.7:/home/username/perl/lib/perl5/5.8.7/aix-64all:/home/username/perl/modules/lib/site_perl/5.8.7/aix-64all:" @INC: /home/username/perl/lib/perl5 /home/username/perl/modules /home/username/perl/modules/lib/site_perl/5.8.7/aix-thread-multi-64all /home/username/perl/modules/lib/site_perl/5.8.7 /home/username/perl/lib/5.8.7/aix-thread-multi-64all /home/username/perl/lib/5.8.7 /home/username/perl/lib /home/username/perl/lib/perl5/site_perl/5.8.7 /home/username/perl/lib/perl5/5.8.7/aix-64all /home/username/perl/modules/lib/site_perl/5.8.7/aix-64all /home/username/perl/lib/5.8.7/aix-thread-multi-64all /home/username/perl/lib/5.8.7 /home/username/perl/lib/site_perl/5.8.7/aix-thread-multi-64all /home/username/perl/lib/site_perl/5.8.7 /home/username/perl/lib/site_perl . ---------------end ---------------------- ____________________________________________________ Start your day with Yahoo! - make it your home page http://www.yahoo.com/r/hs |
From: Petr C. <pci...@us...> - 2005-05-04 09:17:14
|
Update of /cvsroot/perl-xml/sax-perl-org In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24710 Modified Files: index.html perl-sax.css sax-2.1-adv.html sax-2.1-idx.html Log Message: Index: index.html =================================================================== RCS file: /cvsroot/perl-xml/sax-perl-org/index.html,v retrieving revision 1.6 retrieving revision 1.7 diff -u -d -r1.6 -r1.7 --- index.html 11 Jan 2005 14:34:29 -0000 1.6 +++ index.html 4 May 2005 09:17:03 -0000 1.7 @@ -9,15 +9,26 @@ <div class="Header"> <div class="Title">Perl SAX (Simple API for XML) Page</div> This is the current Perl SAX page. The former official - <a href="http://sax.perl.org">Perl SAX page</a> is no more + <a href="http://perl-xml.sourceforge.net/sax/">Perl SAX page</a> is no more maintained for various reasons. Perl SAX is a part of the <a href="http://perl-xml.sourceforge.net/">Perl XML Project</a> hosted by <a href="http://www.sourceforge.net/">Sourceforge</a>. </div> + <div class="LeftBox"> + <div> + <div class="SubTitle">Perl SAX 2.1</div> + The current stable version is 2.1: + <ul> + <li><a href="sax-2.1-ref.html"><b>Perl SAX 2.1 Reference</b></a> (an indexed view of the two following docs)</li> + <li><a href="sax-2.1.html">Perl SAX 2.1 Binding</a></li> + <li><a href="sax-2.1-adv.html">Perl SAX 2.1 Advanced</a></li> + <li><a href="changes-2.1.html">Changes and Issues</a></li> + <ul> + </div> <div> <div class="SubTitle">Perl SAX 2.0</div> - Current stable version of Perl SAX is 2.0. The API is defined + The previous version of Perl SAX was 2.0. The 2.0 API is defined by the following documents: <ul> <li><a href="http://cvs.sourceforge.net/cgi-bin/viewcvs.cgi/*checkout*/perl-xml/libxml-perl/doc/sax-2.0.html?rev=HEAD&content-type=text/html">Perl @@ -27,21 +38,46 @@ </ul> </div> <div> - <div class="SubTitle">Perl SAX 2.1</div> - The version 2.1 is under development: - <ul> - <li><a href="sax-2.1-ref.html"><b>Perl SAX 2.1 Reference</b></a> (an indexed view of the two following docs)</li> - <li><a href="sax-2.1.html">Perl SAX 2.1 Binding</a></li> - <li><a href="sax-2.1-adv.html">Perl SAX 2.1 Advanced</a></li> - <li><a href="changes-2.1.html">Changes and Issues</a></li> - </ul> - </div> - <div> <div class="SubTitle">Related Pages</div> <ul> <li><a href="http://www.saxproject.org/">Official SAX Page</a></li> </ul> </div> + </div> + <div class="RightBox"> + <div class="SubTitle">Recommended Reading</div> + + <div class="Article"> + <a href="http://cpan.uwinnipeg.ca/htdocs/XML-SAX/Intro.html"> + XML::SAX::Intro - An Introduction to SAX Parsing with Perl</a> + </div> + + <div class="Article"> + <a href="http://www.xml.com/pub/a/2004/09/15/pl-perf.html"> + Perl Parser Performance</a> + </div> + + <div class="Article"> + <a href="http://www.xml.com/pub/a/2002/02/13/sax-machines.html"> + Introducing XML::SAX::Machines, Part One</a> + and <a href="http://www.xml.com/pub/a/2002/03/20/machines.html">Two</a> + </div> + + <div class="Article"> + <a href="http://www.xml.com/pub/a/2001/10/10/sax-filters.html"> + Transforming XML With SAX Filters</a> + </div> + <div class="Article"> + <a href="http://www.xml.com/pub/a/2001/09/19/sax-non-xml-data.html"> + Writing SAX Drivers for Non-XML Data</a> + </div> + + <div class="Article"> + <a href="http://www.xml.com/pub/a/2001/02/14/perlsax.html"> + High-Performance XML Parsing With SAX</a> + </div> + + </div> </body> </html> Index: perl-sax.css =================================================================== RCS file: /cvsroot/perl-xml/sax-perl-org/perl-sax.css,v retrieving revision 1.1 retrieving revision 1.2 diff -u -d -r1.1 -r1.2 --- perl-sax.css 25 Oct 2004 09:22:38 -0000 1.1 +++ perl-sax.css 4 May 2005 09:17:03 -0000 1.2 @@ -13,6 +13,22 @@ margin: 0px 0px 0px 0px; } +DIV.LeftBox, DIV.RightBox { + padding: 0px 0px 0px 0px; + border: none; +} + +DIV.LeftBox { + float: left; + width: 65%; +} + +DIV.RightBox { + padding-top: 5px; + float: right; + width: 33%; +} + DIV.Header { background-color: #dce4ec; } @@ -28,3 +44,8 @@ padding: 0px 0px 0px 0px; border: none; } + +DIV.Article { + padding: 3px 5px 1px 5px; + border: none; +} Index: sax-2.1-adv.html =================================================================== RCS file: /cvsroot/perl-xml/sax-perl-org/sax-2.1-adv.html,v retrieving revision 1.7 retrieving revision 1.8 diff -u -d -r1.7 -r1.8 --- sax-2.1-adv.html 15 Mar 2005 16:11:43 -0000 1.7 +++ sax-2.1-adv.html 4 May 2005 09:17:03 -0000 1.8 @@ -46,7 +46,7 @@ option.</p> <p>SAX parsers accept all features as options to the <tt>parse()</tt> -methods and on the parser's constructor. Features are described in +methods and on the parser's constructor. Features are described in the next section.</p> <p> @@ -177,7 +177,7 @@ <dl> <dt class="prop">http://xml.org/sax/features/namespaces</dt> -<dd> A value of 1 indicates namespace URIs and unprefixed local names +<dd>A value of 1 indicates namespace URIs and unprefixed local names for element and attribute names will be available. This feature is on by default and a number of parsers may not be able to turn it off. Thus, a parser claiming to support this feature (and all SAX2 parsers must @@ -194,8 +194,19 @@ </dl> <dl> +<dt class="prop">http://xmlns.perl.org/sax/xmlns-uris</dt> +<dd>This feature controls how the parser treats namespace declaration + attributes. When set on, xmlns and xmlns:* attributes are put into namespaces + in a Perl SAX traditional way; xmlns attributes are in no namespace + while xmlns:* attributes are in the C<http://www.w3.org/2000/xmlns/> + namespace. This feature is set to 1 by default.</dd> +</dl> + +<dl> <dt class="prop">http://xml.org/sax/features/xmlns-uris</dt> -<dd> Controls whether the parser treats namespace declaration +<dd>This feature applies if and only if the + <tt>http://xmlns.perl.org/sax/xmlns-uris</tt> feature is off. + Then, it controls whether the parser treats all namespace declaration attributes as being in the <tt>http://www.w3.org/2000/xmlns/</tt> namespace. By default, Perl SAX conforms to the original "Namespaces in XML" Recommendation, which explicitly states that such attributes Index: sax-2.1-idx.html =================================================================== RCS file: /cvsroot/perl-xml/sax-perl-org/sax-2.1-idx.html,v retrieving revision 1.8 retrieving revision 1.9 diff -u -d -r1.8 -r1.9 --- sax-2.1-idx.html 15 Mar 2005 16:11:44 -0000 1.8 +++ sax-2.1-idx.html 4 May 2005 09:17:03 -0000 1.9 @@ -20,7 +20,7 @@ <div class="box"> <div class="title">Perl SAX 2.1</div> <div class="right">[<a target="_top" href="http://perl-xml.sourceforge.net/perl-sax/">home</a>]</div> - <div class="subtitle">Revision: 2005-03-15</div> + <div class="subtitle">Revision: 2005-05-04</div> <div class="item"> <a href="sax-2.1.html" target="cnt">Introduction</a> </div> |
From: Grant M. <gr...@us...> - 2005-04-20 21:14:05
|
Update of /cvsroot/perl-xml/xml-filter-sort/lib/XML/Filter/Sort In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23053/lib/XML/Filter/Sort Modified Files: Buffer.pm BufferMgr.pm DiskBuffer.pm DiskBufferMgr.pm Log Message: - strip version info from supporting classes Index: Buffer.pm =================================================================== RCS file: /cvsroot/perl-xml/xml-filter-sort/lib/XML/Filter/Sort/Buffer.pm,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- Buffer.pm 20 Apr 2005 20:04:34 -0000 1.2 +++ Buffer.pm 20 Apr 2005 21:13:55 -0000 1.3 @@ -1,5 +1,3 @@ -# $Id$ - package XML::Filter::Sort::Buffer; use strict; @@ -8,10 +6,6 @@ # G L O B A L V A R I A B L E S ############################################################################## -use vars qw($VERSION @ISA); - -$VERSION = '0.91'; - use constant NODE_TYPE => 0; use constant NODE_DATA => 1; use constant NODE_CONTENT => 2; Index: BufferMgr.pm =================================================================== RCS file: /cvsroot/perl-xml/xml-filter-sort/lib/XML/Filter/Sort/BufferMgr.pm,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -u -d -r1.1.1.1 -r1.2 --- BufferMgr.pm 14 Jun 2002 20:40:05 -0000 1.1.1.1 +++ BufferMgr.pm 20 Apr 2005 21:13:56 -0000 1.2 @@ -1,5 +1,3 @@ -# $Id$ - package XML::Filter::Sort::BufferMgr; use strict; @@ -8,15 +6,6 @@ ############################################################################## -# G L O B A L V A R I A B L E S -############################################################################## - -use vars qw($VERSION); - -$VERSION = '0.91'; - - -############################################################################## # M E T H O D S ############################################################################## Index: DiskBuffer.pm =================================================================== RCS file: /cvsroot/perl-xml/xml-filter-sort/lib/XML/Filter/Sort/DiskBuffer.pm,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -u -d -r1.1.1.1 -r1.2 --- DiskBuffer.pm 14 Jun 2002 20:40:05 -0000 1.1.1.1 +++ DiskBuffer.pm 20 Apr 2005 21:13:56 -0000 1.2 @@ -1,5 +1,3 @@ -# $Id$ - package XML::Filter::Sort::DiskBuffer; use strict; @@ -12,9 +10,8 @@ # G L O B A L V A R I A B L E S ############################################################################## -use vars qw($VERSION @ISA); +use vars qw(@ISA); -$VERSION = '0.91'; @ISA = qw(XML::Filter::Sort::Buffer); Index: DiskBufferMgr.pm =================================================================== RCS file: /cvsroot/perl-xml/xml-filter-sort/lib/XML/Filter/Sort/DiskBufferMgr.pm,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -u -d -r1.1.1.1 -r1.2 --- DiskBufferMgr.pm 14 Jun 2002 20:40:09 -0000 1.1.1.1 +++ DiskBufferMgr.pm 20 Apr 2005 21:13:56 -0000 1.2 @@ -1,5 +1,3 @@ -# $Id$ - package XML::Filter::Sort::DiskBufferMgr; use strict; @@ -17,10 +15,9 @@ # G L O B A L V A R I A B L E S ############################################################################## -use vars qw($VERSION @ISA); +use vars qw(@ISA); -$VERSION = '0.91'; -@ISA = qw(XML::Filter::Sort::BufferMgr); +@ISA = qw(XML::Filter::Sort::BufferMgr); use constant DEF_BUCKET_SIZE => 1024 * 1024 * 10; |
From: Grant M. <gr...@us...> - 2005-04-20 20:10:35
|
Update of /cvsroot/perl-xml/xml-filter-sort In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24557 Modified Files: META.yml Log Message: - for 1.01 release Index: META.yml =================================================================== RCS file: /cvsroot/perl-xml/xml-filter-sort/META.yml,v retrieving revision 1.1 retrieving revision 1.2 diff -u -d -r1.1 -r1.2 --- META.yml 20 Apr 2005 08:56:09 -0000 1.1 +++ META.yml 20 Apr 2005 20:10:25 -0000 1.2 @@ -1,7 +1,7 @@ # http://module-build.sourceforge.net/META-spec.html #XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX# name: XML-Filter-Sort -version: 1.00 +version: 1.01 version_from: lib/XML/Filter/Sort.pm installdirs: site requires: |
From: Grant M. <gr...@us...> - 2005-04-20 20:08:46
|
Update of /cvsroot/perl-xml/xml-filter-sort In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23691 Modified Files: Changes README Log Message: - for 1.01 release Index: Changes =================================================================== RCS file: /cvsroot/perl-xml/xml-filter-sort/Changes,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- Changes 20 Apr 2005 02:33:35 -0000 1.2 +++ Changes 20 Apr 2005 20:08:27 -0000 1.3 @@ -1,5 +1,9 @@ Revision history for Perl extension XML::Filter::Sort. +1.01 21-Apr-2005 + - Fixed similar serious bug with text content of sort key was '0', + also reported by Rishi Dhupar + 1.00 20-Apr-2005 - Fixed serious bug with text content = '0' reported by Rishi Dhupar Index: README =================================================================== RCS file: /cvsroot/perl-xml/xml-filter-sort/README,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -u -d -r1.1.1.1 -r1.2 --- README 14 Jun 2002 20:39:42 -0000 1.1.1.1 +++ README 20 Apr 2005 20:08:35 -0000 1.2 @@ -23,14 +23,9 @@ make install -RELEASE HISTORY - - Version 0.91 is the first release to CPAN - - COPYRIGHT - Copyright 2002 Grant McLean <gr...@cp...> + Copyright 2002-2005 Grant McLean <gr...@cp...> This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself. |
From: Grant M. <gr...@us...> - 2005-04-20 20:08:45
|
Update of /cvsroot/perl-xml/xml-filter-sort/lib/XML/Filter In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23691/lib/XML/Filter Modified Files: Sort.pm Log Message: - for 1.01 release Index: Sort.pm =================================================================== RCS file: /cvsroot/perl-xml/xml-filter-sort/lib/XML/Filter/Sort.pm,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- Sort.pm 20 Apr 2005 02:32:49 -0000 1.2 +++ Sort.pm 20 Apr 2005 20:08:35 -0000 1.3 @@ -12,7 +12,7 @@ use vars qw($VERSION @ISA); -$VERSION = '1.00'; +$VERSION = '1.01'; @ISA = qw(XML::SAX::Base); @@ -820,7 +820,7 @@ =head1 COPYRIGHT -Copyright 2002 Grant McLean E<lt>gr...@cp...E<gt> +Copyright 2002-2005 Grant McLean E<lt>gr...@cp...E<gt> This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself. |
From: Grant M. <gr...@us...> - 2005-04-20 20:04:50
|
Update of /cvsroot/perl-xml/xml-filter-sort/lib/XML/Filter/Sort In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21280/lib/XML/Filter/Sort Modified Files: Buffer.pm Log Message: - fix bug where sort key was '0' Index: Buffer.pm =================================================================== RCS file: /cvsroot/perl-xml/xml-filter-sort/lib/XML/Filter/Sort/Buffer.pm,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -u -d -r1.1.1.1 -r1.2 --- Buffer.pm 14 Jun 2002 20:40:11 -0000 1.1.1.1 +++ Buffer.pm 20 Apr 2005 20:04:34 -0000 1.2 @@ -187,7 +187,8 @@ my $text = ''; - while(my $node = shift) { + while(@_) { + my $node = shift; if(ref($node)) { if($node->[NODE_TYPE] eq 'e') { if(@{$node->[NODE_CONTENT]}) { @@ -238,7 +239,8 @@ @_ = @{$self->{tree}} unless(@_); - while(my $node = shift) { + while(@_) { + my $node = shift; if(ref($node)) { if($node->[NODE_TYPE] eq 'e') { $filter->start_element($node->[NODE_DATA]); |
From: Grant M. <gr...@us...> - 2005-04-20 20:04:01
|
Update of /cvsroot/perl-xml/xml-filter-sort/t In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21097/t Modified Files: 1_buffer.t 4_workout.t Log Message: - add tests for '0' in sort key Index: 1_buffer.t =================================================================== RCS file: /cvsroot/perl-xml/xml-filter-sort/t/1_buffer.t,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -u -d -r1.1.1.1 -r1.2 --- 1_buffer.t 14 Jun 2002 20:39:55 -0000 1.1.1.1 +++ 1_buffer.t 20 Apr 2005 20:03:52 -0000 1.2 @@ -143,6 +143,7 @@ <lastname>Boozle</lastname> <age unit='year'>35</age> <empty /> + <zero>0</zero> </person>); my(@keyvals); Index: 4_workout.t =================================================================== RCS file: /cvsroot/perl-xml/xml-filter-sort/t/4_workout.t,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- 4_workout.t 20 Apr 2005 02:33:14 -0000 1.2 +++ 4_workout.t 20 Apr 2005 20:03:53 -0000 1.3 @@ -19,7 +19,7 @@ } -plan tests => 25; +plan tests => 26; use XML::Filter::Sort; use XML::SAX::Machines qw( :all ); @@ -949,6 +949,41 @@ ############################################################################## +# Test that text content of '0' doesn't give us grief (any more). +# + +$xmlin = q(<list> + <prefix>0</prefix> + <item>9</item> + <item>5</item> + <item>0</item> + <item>7</item> + <suffix>0</suffix> +</list>); + +$xmlout = ''; + +@opts = (Record => 'item', Keys => '., num, asc'); +push @opts, @main::TempOpts; + +$sorter = Pipeline( + XML::Filter::Sort->new(@opts) => \$xmlout +); +$sorter->parse_string($xmlin); +fix_xml($xmlout); + +is($xmlout, q(<list> + <prefix>0</prefix> + <item>0</item> + <item>5</item> + <item>7</item> + <item>9</item> + <suffix>0</suffix> +</list>), 'No problem with text content of "0" even in sort key'); + + + +############################################################################## # S U B R O U T I N E S ############################################################################## |
From: Grant M. <gr...@us...> - 2005-04-20 08:57:52
|
Update of /cvsroot/perl-xml/xml-filter-sort In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16537 Modified Files: .cvsignore Log Message: - ignore .lwpcookies Index: .cvsignore =================================================================== RCS file: /cvsroot/perl-xml/xml-filter-sort/.cvsignore,v retrieving revision 1.1 retrieving revision 1.2 diff -u -d -r1.1 -r1.2 --- .cvsignore 20 Apr 2005 08:47:33 -0000 1.1 +++ .cvsignore 20 Apr 2005 08:57:42 -0000 1.2 @@ -4,3 +4,4 @@ *.tar.gz XML-Filter-Sort* runtest +.lwpcookies |
From: Grant M. <gr...@us...> - 2005-04-20 08:56:18
|
Update of /cvsroot/perl-xml/xml-filter-sort In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15846 Modified Files: MANIFEST Added Files: META.yml Log Message: - add META.yml --- NEW FILE: META.yml --- # http://module-build.sourceforge.net/META-spec.html #XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX# name: XML-Filter-Sort version: 1.00 version_from: lib/XML/Filter/Sort.pm installdirs: site requires: Test::Simple: 0.41 XML::SAX: XML::SAX::Writer: distribution_type: module generated_by: ExtUtils::MakeMaker version 6.17 Index: MANIFEST =================================================================== RCS file: /cvsroot/perl-xml/xml-filter-sort/MANIFEST,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -u -d -r1.1.1.1 -r1.2 --- MANIFEST 14 Jun 2002 20:39:42 -0000 1.1.1.1 +++ MANIFEST 20 Apr 2005 08:56:09 -0000 1.2 @@ -15,3 +15,4 @@ t/4_workout.t t/5_diskbuffer.t t/6_diskworkout.t +META.yml Module meta-data (added by MakeMaker) |
From: Grant M. <gr...@us...> - 2005-04-20 08:51:34
|
Update of /cvsroot/perl-xml/xml-filter-sort In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14084 Added Files: .releaserc Log Message: - for Module::Release --- NEW FILE: .releaserc --- cpan_user GRANTM sf_user <none> |
From: Grant M. <gr...@us...> - 2005-04-20 08:47:42
|
Update of /cvsroot/perl-xml/xml-filter-sort/t In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12698/t Added Files: .cvsignore Log Message: - ignore build and test temp files --- NEW FILE: .cvsignore --- temp |