[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

Re: Advance freeze exception request for libxml-rsslite-perl



Mehdi,
If we are going with basing it off the current testing version , i.e. 0.11~dfsg-1 then the changes are

1.) Removing t/02rss.t, t/journal.rss and t/sampleRSS.xml
2.) Removing those lines from the MANIFEST file.
3) Adding debian/repack.* files to handle the above modifications

Needless to say these changes have no effect on the binary package (apart from changelogs etc) only the source package.

I include a debdiff between 0.11-3 and 0.15+dfsg-1.

Nicholas

Mehdi Dogguy wrote:
On 10/22/2010 10:39 AM, Nicholas Bamber wrote:
Over a year ago concerns over the license status of the test data in
this package were raised internally within the Debian perl group.
Unfortunately this seems to have had the effect of scaring anyone from
looking at the package in more detail.
There is now an RC bug report #600806. Can I assume that we could get a
freeze exception for an '0.11~dfsg-1' version and I assume I should not
request one for 0.15+dfsg-1?


Can we get a description of the actual changes? and preferably a debdiff?

Regards,


diff -Nru libxml-rsslite-perl-0.11/CHANGES libxml-rsslite-perl-0.15+dfsg/CHANGES
--- libxml-rsslite-perl-0.11/CHANGES	2003-02-24 06:25:54.000000000 +0000
+++ libxml-rsslite-perl-0.15+dfsg/CHANGES	2009-09-06 04:26:07.000000000 +0100
@@ -1,5 +1,16 @@
 Revision history for Perl extension XML::RSSLite.
 
+0.15	Sat Sep  5 23:25:51 EDT 2009
+	Strip bracketing whitespace from links
+
+	Support SSL links
+
+	Fix(?) relative URI munging, broken since at least 0.06
+
+	Fixed HTML anchor in item link munging, broken since at least 0.06
+
+	Fixed title URI to link if latter is missing, broken since at least 0.06
+
 0.11	Mon Feb 24 06:25:54 UTC 2003
 	Vast speed and memory requirement improvements for deep structures.
 
diff -Nru libxml-rsslite-perl-0.11/debian/changelog libxml-rsslite-perl-0.15+dfsg/debian/changelog
--- libxml-rsslite-perl-0.11/debian/changelog	2010-10-22 10:47:26.000000000 +0100
+++ libxml-rsslite-perl-0.15+dfsg/debian/changelog	2010-10-20 09:24:52.000000000 +0100
@@ -1,3 +1,42 @@
+libxml-rsslite-perl (0.15+dfsg-1) UNRELEASED; urgency=low
+
+  OTHER TODO:
+  - "manpage-has-errors-from-pod2man" lintian warning
+
+  [ gregor herrmann ]
+  * debian/control: Changed: Switched Vcs-Browser field to ViewSVN
+    (source stanza).
+  * debian/control: Added: ${misc:Depends} to Depends: field.
+
+  [ Nathan Handler ]
+  * New upstream release (closes: #442804)
+  * debian/watch:
+    - Update to ignore development releases.
+  * debian/compat:
+    - Bump to 7
+  * debian/control:
+    - Build-Depend on debhelper (>= 7)
+    - Add myself to list of Uploaders
+    - Bump Standards-Version to 3.8.3
+  * debian/copyright:
+    - Update to use new format
+    - Add myself to debian/* copyright
+  * debian/docs:
+    - No need to install TODO
+  * debian/rules:
+    - Switch to new short format
+
+  [ Nicholas Bamber ]
+  * Repacked to remove material without license
+  * Added debian/source/format file
+  * Added myself to Uploaders
+  * Reformatted short description
+  * Removed unnecessary versioning in dependencies
+  * Upped standards version
+  * Refreshed copyright
+
+ -- Nathan Handler <nhandler@ubuntu.com>  Fri, 11 Sep 2009 23:47:38 +0000
+
 libxml-rsslite-perl (0.11-3) unstable; urgency=low
 
   [ gregor herrmann ]
diff -Nru libxml-rsslite-perl-0.11/debian/compat libxml-rsslite-perl-0.15+dfsg/debian/compat
--- libxml-rsslite-perl-0.11/debian/compat	2010-10-22 10:47:26.000000000 +0100
+++ libxml-rsslite-perl-0.15+dfsg/debian/compat	2010-10-18 23:33:36.000000000 +0100
@@ -1 +1 @@
-6
+7
diff -Nru libxml-rsslite-perl-0.11/debian/control libxml-rsslite-perl-0.15+dfsg/debian/control
--- libxml-rsslite-perl-0.11/debian/control	2010-10-22 10:47:26.000000000 +0100
+++ libxml-rsslite-perl-0.15+dfsg/debian/control	2010-10-20 09:14:01.000000000 +0100
@@ -1,19 +1,20 @@
 Source: libxml-rsslite-perl
 Section: perl
 Priority: optional
-Build-Depends: debhelper (>= 6)
-Build-Depends-Indep: perl (>= 5.6.0)
+Build-Depends: debhelper (>= 7)
+Build-Depends-Indep: perl
 Maintainer: Debian Perl Group <pkg-perl-maintainers@lists.alioth.debian.org>
-Uploaders: Roberto C. Sanchez <roberto@debian.org>
+Uploaders: Ernesto Hernández-Novich (USB) <emhn@usb.ve>,
+ Nathan Handler <nhandler@ubuntu.com>
 Homepage: http://search.cpan.org/dist/XML-RSSLite/
 Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libxml-rsslite-perl/
-Vcs-Browser: http://svn.debian.org/wsvn/pkg-perl/trunk/libxml-rsslite-perl/
-Standards-Version: 3.7.3
+Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libxml-rsslite-perl/
+Standards-Version: 3.9.1
 
 Package: libxml-rsslite-perl
 Architecture: all
-Depends: ${perl:Depends}
-Description:  Lightweight, "relaxed" RSS (and XML-ish) parser
+Depends: ${misc:Depends}, ${perl:Depends}
+Description: lightweight, "relaxed" RSS (and XML-ish) parser
  XML::RSSLite attempts to extract the maximum amount of content from
  available documents, and is less concerned with XML compliance than
  alternatives. Rather than rely on XML::Parser, it uses heuristics and good
diff -Nru libxml-rsslite-perl-0.11/debian/copyright libxml-rsslite-perl-0.15+dfsg/debian/copyright
--- libxml-rsslite-perl-0.11/debian/copyright	2010-10-22 10:47:26.000000000 +0100
+++ libxml-rsslite-perl-0.15+dfsg/debian/copyright	2010-10-20 09:24:35.000000000 +0100
@@ -1,25 +1,34 @@
-This package was debianized by Ernesto Hernández-Novich <emhn@telcel.net.ve>
-on Wed, 03 May 2006 11:42:50 -0400
-
-It was downloaded from http://search.cpan.org/dist/XML-RSSLite/
-
-Upstream Authors: 
-
-Jerrad Pierce <jpierce@cpan.org>
-Scott Thomason <scott@thomasons.org>
+Format-Specification: http://svn.debian.org/wsvn/dep/web/deps/dep5.mdwn?op=file&rev=135
+Maintainer: Jerrad Pierce <jpierce@cpan.org>
+Source: http://search.cpan.org/dist/XML-RSSLite/
+Name: XML-RSSLite
 
+Files: *
 Copyright:
+ 2003, 2003, 2009, Jerrad Pierce <jpierce@cpan.org>
+ 2000, Scott Thomason <scott@thomasons.org>
+License: Artistic or GPL-1+
 
-    Portions Copyright (c) 2002 Jerrad Pierce, (c) 2000 Scott Thomason.
-
-License:
-    All rights reserved. This program is free software; you can redistribute it
-    and/or modify it under the same terms as Perl itself.
-
-Perl is distributed under your choice of the GNU General Public License or
-the Artistic License.
-
-The complete text of the GNU General Public License can be found in
-/usr/share/common-licenses/GPL and the Artistic License can be found
-in /usr/share/common-licenses/Artistic.
-
+Files: debian/*
+Copyright:
+ 2006, Ernesto Hernández-Novich <emhn@telcel.net.ve>
+ 2008, Roberto C. Sanchez <roberto@debian.org>
+ 2009, Nathan Handler <nhandler@ubuntu.com>
+ 2010, Nicholas Bamber <nicholas@periapt.co.uk>
+License: Artistic or GPL-1+
+
+License: Artistic
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the Artistic License, which comes with Perl.
+ .
+ On Debian systems, the complete text of the Artistic License
+ can be found in `/usr/share/common-licenses/Artistic'.
+
+License: GPL-1+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 1, or (at your option)
+ any later version.
+ .
+ On Debian systems, the complete text of version 1 of the
+ General Public License can be found in `/usr/share/common-licenses/GPL-1'.
diff -Nru libxml-rsslite-perl-0.11/debian/docs libxml-rsslite-perl-0.15+dfsg/debian/docs
--- libxml-rsslite-perl-0.11/debian/docs	2010-10-22 10:47:26.000000000 +0100
+++ libxml-rsslite-perl-0.15+dfsg/debian/docs	2010-10-18 23:33:36.000000000 +0100
@@ -1,2 +1 @@
 README
-TODO
diff -Nru libxml-rsslite-perl-0.11/debian/patches/poderrors.patch libxml-rsslite-perl-0.15+dfsg/debian/patches/poderrors.patch
--- libxml-rsslite-perl-0.11/debian/patches/poderrors.patch	1970-01-01 01:00:00.000000000 +0100
+++ libxml-rsslite-perl-0.15+dfsg/debian/patches/poderrors.patch	2010-10-20 09:43:20.000000000 +0100
@@ -0,0 +1,20 @@
+--- a/RSSLite.pm
++++ b/RSSLite.pm
+@@ -407,6 +407,8 @@
+ 
+ =back
+ 
++=back
++
+ =head2 CAVEATS
+ 
+ This is not a conforming parser. It does not handle the following
+@@ -443,8 +445,6 @@
+ 
+ =back
+ 
+-=back
+-
+ =head1 SEE ALSO
+ 
+ perl(1), C<XML::RSS>, C<XML::SAX::PurePerl>,
diff -Nru libxml-rsslite-perl-0.11/debian/patches/series libxml-rsslite-perl-0.15+dfsg/debian/patches/series
--- libxml-rsslite-perl-0.11/debian/patches/series	1970-01-01 01:00:00.000000000 +0100
+++ libxml-rsslite-perl-0.15+dfsg/debian/patches/series	2010-10-20 09:35:51.000000000 +0100
@@ -0,0 +1 @@
+poderrors.patch
diff -Nru libxml-rsslite-perl-0.11/debian/repack.local libxml-rsslite-perl-0.15+dfsg/debian/repack.local
--- libxml-rsslite-perl-0.11/debian/repack.local	1970-01-01 01:00:00.000000000 +0100
+++ libxml-rsslite-perl-0.15+dfsg/debian/repack.local	2010-10-20 08:46:10.000000000 +0100
@@ -0,0 +1,4 @@
+MANIFEST=1
+rm t/02rss.t
+rm t/journal.rss
+rm t/sampleRSS.xml
diff -Nru libxml-rsslite-perl-0.11/debian/repack.stub libxml-rsslite-perl-0.15+dfsg/debian/repack.stub
--- libxml-rsslite-perl-0.11/debian/repack.stub	1970-01-01 01:00:00.000000000 +0100
+++ libxml-rsslite-perl-0.15+dfsg/debian/repack.stub	2010-10-20 08:42:02.000000000 +0100
@@ -0,0 +1,82 @@
+#!/bin/sh
+
+: <<=cut
+=pod
+
+=head1 NAME
+
+repack.stub - script to repack upstream tarballs from uscan
+
+=head1 INSTRUCTIONS
+
+put this in debian/repack.stub and add "debian sh debian/repack.stub" to
+the end of the line in debian/watch. you will also need to add a version
+mangle to debian/watch.
+
+then create a debian/repack.local. this is a shell script that is
+sources under "set -e", so be careful to check returns codes.
+
+=head1 FUNCTIONS
+
+=over 4
+
+=item rm
+
+rm is replaced by a function that does some magic ("rm -rv" by default), but also changes MANIFEST if $MANIFEST is 1
+
+=item mv
+
+mv is replaced by a function that just does mv (by default), but also changes MANIFEST if $MANIFEST is 1
+
+=item requires_version
+
+requires_version is there for future usage for requiring certain versions of the script
+
+=back
+
+=head1 VARIABLES
+
+=over 4
+
+=item SUFFIX
+
+defaults to +dfsg
+
+what to append to the upstream version
+
+=item RM_OPTS
+
+defaults to -vrf
+
+options to pass to rm
+
+=item MANIFEST
+
+defaults to 0, set to 1 to turn on.
+
+this will manipulate MANIFEST files in CPAN tarballs.
+
+=item UP_BASE
+
+this is the directory where the upstream source is.
+
+=back
+
+=cut
+
+if [ -z "$REPACK_SH" ]; then
+    if [ -f ../../scripts/repack.sh ]; then
+        REPACK_SH=../../scripts/repack.sh
+    fi
+    if [ -z "$REPACK_SH" ] && which repack.sh > /dev/null; then
+        REPACK_SH=$(which repack.sh)
+    fi
+fi
+
+if [ ! -f "$REPACK_SH" ]; then
+    echo "Couldn't find a repack.sh. please put it in your PATH, put it at ../../scripts/repack.sh, or put it somewhere else and set the REPACK_SH variable"
+    echo "You can get it from http://svn.debian.org/viewsvn/pkg-perl/scripts/repack.sh";
+    exit 1
+fi
+
+exec "$REPACK_SH" "$@"
diff -Nru libxml-rsslite-perl-0.11/debian/rules libxml-rsslite-perl-0.15+dfsg/debian/rules
--- libxml-rsslite-perl-0.11/debian/rules	2010-10-22 10:47:26.000000000 +0100
+++ libxml-rsslite-perl-0.15+dfsg/debian/rules	2010-10-18 23:33:36.000000000 +0100
@@ -1,65 +1,4 @@
 #!/usr/bin/make -f
-# This debian/rules file is provided as a template for normal perl
-# packages. It was created by Marc Brockschmidt <marc@dch-faq.de> for
-# the Debian Perl Group (http://pkg-perl.alioth.debian.org/) but may
-# be used freely wherever it is useful.
 
-# Uncomment this to turn on verbose mode.
-#export DH_VERBOSE=1
-
-# If set to a true value then MakeMaker's prompt function will
-# always return the default without waiting for user input.
-export PERL_MM_USE_DEFAULT=1
-
-PACKAGE=$(shell dh_listpackages)
-
-ifndef PERL
-PERL = /usr/bin/perl
-endif
-
-TMP     =$(CURDIR)/debian/$(PACKAGE)
-
-build: build-stamp
-build-stamp:
-	dh_testdir
-	$(PERL) Makefile.PL INSTALLDIRS=vendor
-	$(MAKE)
-	$(MAKE) test
-	touch build-stamp
-
-clean:
-	dh_testdir
-	dh_testroot
-	dh_clean build-stamp install-stamp
-	[ ! -f Makefile ] || $(MAKE) realclean
-
-install: install-stamp
-install-stamp: build-stamp
-	dh_testdir
-	dh_testroot
-	dh_clean -k
-	$(MAKE) install DESTDIR=$(TMP) PREFIX=/usr
-	[ ! -d $(TMP)/usr/lib/perl5 ] || rmdir --ignore-fail-on-non-empty --parents --verbose $(TMP)/usr/lib/perl5
-	touch install-stamp
-
-binary-arch:
-# We have nothing to do by default.
-
-binary-indep: build install
-	dh_testdir
-	dh_testroot
-	dh_installdocs
-	dh_installchangelogs CHANGES
-	dh_perl
-	dh_compress
-	dh_fixperms
-	dh_installdeb
-	dh_gencontrol
-	dh_md5sums
-	dh_builddeb
-
-source diff:                                                                  
-	@echo >&2 'source and diff are obsolete - use dpkg-source -b'; false
-
-binary: binary-indep binary-arch
-.PHONY: build clean binary-indep binary-arch binary
+%:
+	dh $@
diff -Nru libxml-rsslite-perl-0.11/debian/source/format libxml-rsslite-perl-0.15+dfsg/debian/source/format
--- libxml-rsslite-perl-0.11/debian/source/format	1970-01-01 01:00:00.000000000 +0100
+++ libxml-rsslite-perl-0.15+dfsg/debian/source/format	2010-10-20 08:52:12.000000000 +0100
@@ -0,0 +1 @@
+3.0 (quilt)
diff -Nru libxml-rsslite-perl-0.11/debian/watch libxml-rsslite-perl-0.15+dfsg/debian/watch
--- libxml-rsslite-perl-0.11/debian/watch	2010-10-22 10:47:26.000000000 +0100
+++ libxml-rsslite-perl-0.15+dfsg/debian/watch	2010-10-20 09:10:33.000000000 +0100
@@ -1,2 +1,3 @@
 version=3
-http://search.cpan.org/dist/XML-RSSLite/ .*/XML-RSSLite-v?(\d[\d_.]+)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip)
+opts=dversionmangle=s/\+dfsg// \
+http://search.cpan.org/dist/XML-RSSLite/ .*/XML-RSSLite-v?(\d[\d.]+)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip)
diff -Nru libxml-rsslite-perl-0.11/MANIFEST libxml-rsslite-perl-0.15+dfsg/MANIFEST
--- libxml-rsslite-perl-0.11/MANIFEST	2003-02-24 06:25:54.000000000 +0000
+++ libxml-rsslite-perl-0.15+dfsg/MANIFEST	2010-10-20 08:48:36.000000000 +0100
@@ -5,6 +5,4 @@
 Makefile.PL
 RSSLite.pm
 t/01basic.t
-t/02rss.t
-t/journal.rss
-t/sampleRSS.xml
+META.yml                                 Module meta-data (added by MakeMaker)
diff -Nru libxml-rsslite-perl-0.11/META.yml libxml-rsslite-perl-0.15+dfsg/META.yml
--- libxml-rsslite-perl-0.11/META.yml	1970-01-01 01:00:00.000000000 +0100
+++ libxml-rsslite-perl-0.15+dfsg/META.yml	2009-09-06 04:26:37.000000000 +0100
@@ -0,0 +1,12 @@
+--- #YAML:1.0
+name:                XML-RSSLite
+version:             0.15
+abstract:            ~
+license:             ~
+author:              ~
+generated_by:        ExtUtils::MakeMaker version 6.42
+distribution_type:   module
+requires:     
+meta-spec:
+    url:     http://module-build.sourceforge.net/META-spec-v1.3.html
+    version: 1.3
diff -Nru libxml-rsslite-perl-0.11/RSSLite.pm libxml-rsslite-perl-0.15+dfsg/RSSLite.pm
--- libxml-rsslite-perl-0.11/RSSLite.pm	2003-02-24 06:25:54.000000000 +0000
+++ libxml-rsslite-perl-0.15+dfsg/RSSLite.pm	2009-09-06 04:25:38.000000000 +0100
@@ -3,7 +3,7 @@
 use strict;
 use vars qw($VERSION);
 
-$VERSION = 0.11;
+$VERSION = 0.15;
 
 sub import{
   no strict 'refs';
@@ -143,10 +143,10 @@
       # See if you can use misplaced url in title for empty links
       elsif( exists($i->{'title'}) ){
 	# The next case would trap this, but try to short-circuit the gathering
-	if ($i->{'title'} =~ /^(?:ht)|ftp:/) {
+	if ($i->{'title'} =~ /^(?:https?|ftp):/) {
 	  $i->{'link'} = $i->{'title'};
 	}
-	elsif ($i->{'title'} =~ /"((?:ht)|ftp.*?)"/) {
+	elsif ($i->{'title'} =~ /"((?:https?|ftp).*?)"/) {
 	  $i->{'link'} = $1;
 	  $i->{'title'} =~ s/<.*?>//;
 	}
@@ -156,15 +156,16 @@
       }
     }
     
+    # Clean bogus whitespace
+    $i->{'link'} =~ s/^\s+|\s+$//;
+
     # Make sure you've got an http/ftp link
-    if( exists( $i->{'link'}) && $i->{'link'} !~ m{^(http|ftp)://}i) {
+    if( exists( $i->{'link'}) && $i->{'link'} !~ m{^(https?|ftp)://}i) {
       ## Rip link out of anchor tag
-      $i->{'link'} =~ m{a\s+href=("|&quot;)?(.*?)("|>|&quot;|&gt;)?}i;
-      if( $2 ){
-	$i->{'link'} = $2;
-      }
-      elsif( $i->{'link'}  =~ m{[\.#/]}i and $rr->{'link'} =~ m{^http://} ){
-	## Smells like a relative url
+      if( ref($i->{'link'}) && $i->{'link'}->{a}->{href} ){
+	$i->{'link'} = $i->{'link'}->{a}->{href} }
+      ## Smells like a relative url
+      elsif( $i->{'link'}  =~ m{^[#/]} and $rr->{'link'} =~ m{^https?://} ){
 	if (substr($i->{'link'}, 0, 1) ne '/') {
 	  $i->{'link'} = '/' . $i->{'link'};
 	}
@@ -247,7 +248,7 @@
     #Did we get attributes? clean them up and chuck them in a hash.
     if( $attr ){
       ($_, $attr) = ($attr, {});
-      $attr->{$1} = $3 while m/([^\s=]+)\s*=\s*(['"])(.*?)\2/g;
+      $attr->{$1} = $3 while m/([^\s=]+)\s*=\s*(['"]?)([^\2>]*?)(?:\2|$)/g;
     }
 
     my $inhash;
@@ -346,15 +347,17 @@
 
 =item Remove characters other than 0-9~!@#$%^&*()-+=a-zA-Z[];',.:"<>?\s
 
+=item Remove leading whitespace from URIs
+
 =item Use <url> tags when <link> is empty
 
 =item Use misplaced urls in <title> when <link> is empty 
 
 =item Exract links from <a href=...> if required   
 
-=item Limit links to ftp and http
+=item Limit links to ftp and http(s)
 
-=item Join relative urls to the site base
+=item Join relative item urls (beginning with / or #) to the site base
 
 =back
 
@@ -436,7 +439,7 @@
 
 =item namespaces
 
-This might be arriving in the next release.
+This may or may not be arriving in some future release.
 
 =back
 
@@ -455,7 +458,7 @@
 
 =head1 LICENSE
 
-Portions Copyright (c) 2002 Jerrad Pierce, (c) 2000 Scott Thomason.
+Portions Copyright (c) 2002,2003,2009 Jerrad Pierce, (c) 2000 Scott Thomason.
 All rights reserved. This program is free software; you can redistribute it 
 and/or modify it under the same terms as Perl itself.
 
diff -Nru libxml-rsslite-perl-0.11/t/01basic.t libxml-rsslite-perl-0.15+dfsg/t/01basic.t
--- libxml-rsslite-perl-0.11/t/01basic.t	2003-02-24 06:25:54.000000000 +0000
+++ libxml-rsslite-perl-0.15+dfsg/t/01basic.t	2009-09-06 03:29:48.000000000 +0100
@@ -1,7 +1,7 @@
 use XML::RSSLite;
 print "1..2\n";
 
-print "ok 1\n";
+print "ok 1 #Require\n";
 
 print 'not ' unless defined($XML::RSSLite::VERSION);
-print "ok 2\n";
+print "ok 2 #VERSION\n";
diff -Nru libxml-rsslite-perl-0.11/t/02rss.t libxml-rsslite-perl-0.15+dfsg/t/02rss.t
--- libxml-rsslite-perl-0.11/t/02rss.t	2003-02-24 06:25:54.000000000 +0000
+++ libxml-rsslite-perl-0.15+dfsg/t/02rss.t	1970-01-01 01:00:00.000000000 +0100
@@ -1,28 +0,0 @@
-use XML::RSSLite;
-print "1..2\n";
-
-if( open(RSS, "t/sampleRSS.xml") ){
-  my(%result, $str);
-  $str = do{ local $/; <RSS>};
-  close(RSS);
-  parseRSS(\%result, \$str);
-  print 'not ' unless $result{image}->[1]->{width} == 176;
-  print "ok 1 # $result{image}->[1]->{width} == 176\n";
-}
-else{
-  print "ok 1 #skipped Could not open t/sampleRSS.xml:$!\n";
-}
-
-if( open(RSS, "t/journal.rss") ){
-  my(%result, $str);
-  $str = do{ local $/; <RSS>};
-  close(RSS);
-  parseRSS(\%result, \$str);
-  print 'not ' unless $result{items}->[0]->{title} eq 'gizmo_mathboy (2002.05.03 13:41)';
-  print "ok 2 # '$result{items}->[0]->{title}' eq 'gizmo_mathboy (2002.05.03 13:41)'\n";
-}
-else{
-  print "ok 2 #skipped Could not open t/rss: $!\n";
-}
-
-1;
diff -Nru libxml-rsslite-perl-0.11/t/journal.rss libxml-rsslite-perl-0.15+dfsg/t/journal.rss
--- libxml-rsslite-perl-0.11/t/journal.rss	2003-02-24 06:25:54.000000000 +0000
+++ libxml-rsslite-perl-0.15+dfsg/t/journal.rss	1970-01-01 01:00:00.000000000 +0100
@@ -1,157 +0,0 @@
-<?xml version="1.0" encoding="ISO-8859-1"?>
-
-<rdf:RDF
- xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#";
- xmlns="http://purl.org/rss/1.0/";
- xmlns:dc="http://purl.org/dc/elements/1.1/";
- xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/";
- xmlns:syn="http://purl.org/rss/1.0/modules/syndication/";
->
-
-<channel rdf:about="http://use.perl.org/journal.pl?op=top";>
-<title>use Perl Journals</title>
-<link>http://use.perl.org/journal.pl?op=top</link>
-<description>Top 20 Journals</description>
-<dc:language>en-us</dc:language>
-<dc:rights>use Perl; is Copyright 1997-2002, Chris Nandor. Stories, comments, journals, and other submissions posted on use Perl; are Copyright their respective owners.</dc:rights>
-<dc:date>2002-05-03T19:12:46+00:00</dc:date>
-<dc:publisher>pudge</dc:publisher>
-<dc:creator>pudge@perl.org</dc:creator>
-<dc:subject>Technology</dc:subject>
-<syn:updatePeriod>hourly</syn:updatePeriod>
-<syn:updateFrequency>1</syn:updateFrequency>
-<syn:updateBase>1970-01-01T00:00+00:00</syn:updateBase>
-<items>
- <rdf:Seq>
-  <rdf:li rdf:resource="http://use.perl.org/~gizmo_mathboy/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~pudge/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~cwest/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~2shortplanks/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~mako132/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~geoff/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~ziggy/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~chaoticset/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~Elian/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~jjohn/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~KM/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~mothra/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~davorg/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~rafael/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~Simon/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~TorgoX/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~chromatic/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~tinman/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~vek/journal/"; />
-  <rdf:li rdf:resource="http://use.perl.org/~acme/journal/"; />
- </rdf:Seq>
-</items>
-<image rdf:resource="http://use.perl.org/images/topics/useperl.gif"; />
-</channel>
-
-<image rdf:about="http://use.perl.org/images/topics/useperl.gif";>
-<title>use Perl Journals</title>
-<url>http://use.perl.org/images/topics/useperl.gif</url>
-<link>http://use.perl.org/journal.pl?op=top</link>
-</image>
-
-<item rdf:about="http://use.perl.org/~gizmo_mathboy/journal/";>
-<title>gizmo_mathboy (2002.05.03 13:41)</title>
-<link>http://use.perl.org/~gizmo_mathboy/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~pudge/journal/";>
-<title>pudge (2002.05.03 13:06)</title>
-<link>http://use.perl.org/~pudge/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~cwest/journal/";>
-<title>cwest (2002.05.03 12:06)</title>
-<link>http://use.perl.org/~cwest/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~2shortplanks/journal/";>
-<title>2shortplanks (2002.05.03 11:49)</title>
-<link>http://use.perl.org/~2shortplanks/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~mako132/journal/";>
-<title>mako132 (2002.05.03 11:28)</title>
-<link>http://use.perl.org/~mako132/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~geoff/journal/";>
-<title>geoff (2002.05.03 11:25)</title>
-<link>http://use.perl.org/~geoff/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~ziggy/journal/";>
-<title>ziggy (2002.05.03 10:43)</title>
-<link>http://use.perl.org/~ziggy/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~chaoticset/journal/";>
-<title>chaoticset (2002.05.03 10:34)</title>
-<link>http://use.perl.org/~chaoticset/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~Elian/journal/";>
-<title>Elian (2002.05.03 10:30)</title>
-<link>http://use.perl.org/~Elian/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~jjohn/journal/";>
-<title>jjohn (2002.05.03  9:43)</title>
-<link>http://use.perl.org/~jjohn/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~KM/journal/";>
-<title>KM (2002.05.03  9:27)</title>
-<link>http://use.perl.org/~KM/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~mothra/journal/";>
-<title>mothra (2002.05.03  8:52)</title>
-<link>http://use.perl.org/~mothra/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~davorg/journal/";>
-<title>davorg (2002.05.03  7:40)</title>
-<link>http://use.perl.org/~davorg/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~rafael/journal/";>
-<title>rafael (2002.05.03  5:46)</title>
-<link>http://use.perl.org/~rafael/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~Simon/journal/";>
-<title>Simon (2002.05.03  5:36)</title>
-<link>http://use.perl.org/~Simon/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~TorgoX/journal/";>
-<title>TorgoX (2002.05.03  2:11)</title>
-<link>http://use.perl.org/~TorgoX/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~chromatic/journal/";>
-<title>chromatic (2002.05.03  0:49)</title>
-<link>http://use.perl.org/~chromatic/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~tinman/journal/";>
-<title>tinman (2002.05.03  0:21)</title>
-<link>http://use.perl.org/~tinman/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~vek/journal/";>
-<title>vek (2002.05.02 19:16)</title>
-<link>http://use.perl.org/~vek/journal/</link>
-</item>
-
-<item rdf:about="http://use.perl.org/~acme/journal/";>
-<title>acme (2002.05.02 11:48)</title>
-<link>http://use.perl.org/~acme/journal/</link>
-</item>
-
-</rdf:RDF>
diff -Nru libxml-rsslite-perl-0.11/t/sampleRSS.xml libxml-rsslite-perl-0.15+dfsg/t/sampleRSS.xml
--- libxml-rsslite-perl-0.11/t/sampleRSS.xml	2003-02-24 06:25:54.000000000 +0000
+++ libxml-rsslite-perl-0.15+dfsg/t/sampleRSS.xml	1970-01-01 01:00:00.000000000 +0100
@@ -1,59 +0,0 @@
-<?xml version="1.0" encoding="ISO-8859-1" ?>
-<rss version="0.91">
-	<channel>
-		<title>WriteTheWeb</title> 
-		<link>http://writetheweb.com</link> 
-		<description>News for web users that write back</description> 
-		<language>en-us</language> 
-		<copyright>Copyright 2000, WriteTheWeb team.</copyright> 
-		<managingEditor>editor@writetheweb.com</managingEditor> 
-		<webMaster>webmaster@writetheweb.com</webMaster> 
-		<image>
-			<title>WriteTheWeb</title> 
-			<url>http://writetheweb.com/images/mynetscape88.gif</url> 
-			<link>http://writetheweb.com</link> 
-			<width>88</width> 
-			<height>31</height> 
-			<description>News for web users that write back</description> 
-			</image>
-		<image>
-			<title>WriteTheWeb</title> 
-			<url>http://writetheweb.com/images/mynetscape88.gif</url> 
-			<link>http://writetheweb.com</link> 
-			<width>176</width> 
-			<height>62</height> 
-			<description>News for web users that write back</description> 
-			</image>
-
-		<item>
-			<title>Giving the world a pluggable Gnutella</title> 
-			<link>http://writetheweb.com/read.php?item=24</link> 
-			<description>WorldOS is a framework on which to build programs that work like Freenet or Gnutella -allowing distributed applications using peer-to-peer routing.</description> 
-			</item>
-		<item>
-			<title>Syndication discussions hot up</title> 
-			<link>http://writetheweb.com/read.php?item=23</link> 
-			<description>After a period of dormancy, the Syndication mailing list has become active again, with contributions from leaders in traditional media and Web syndication.</description> 
-			</item>
-		<item>
-			<title>Personal web server integrates file sharing and messaging</title> 
-			<link>http://writetheweb.com/read.php?item=22</link> 
-			<description>The Magi Project is an innovative project to create a combined personal web server and messaging system that enables the sharing and synchronization of information across desktop, laptop and palmtop devices.</description> 
-			</item>
-		<item>
-			<title>Syndication and Metadata</title> 
-			<link>http://writetheweb.com/read.php?item=21</link> 
-			<description>RSS is probably the best known metadata format around. RDF is probably one of the least understood. In this essay, published on my O'Reilly Network weblog, I argue that the next generation of RSS should be based on RDF.</description> 
-			</item>
-		<item>
-			<title>UK bloggers get organised</title> 
-			<link>http://writetheweb.com/read.php?item=20</link> 
-			<description>Looks like the weblogs scene is gathering pace beyond the shores of the US. There's now a UK-specific page on weblogs.com, and a mailing list at egroups.</description> 
-			</item>
-		<item>
-			<title>Yournamehere.com more important than anything</title> 
-			<link>http://writetheweb.com/read.php?item=19</link> 
-			<description>Whatever you're publishing on the web, your site name is the most valuable asset you have, according to Carl Steadman.</description> 
-			</item>
-		</channel>
-	</rss>

Reply to: