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 <nhand...@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-maintain...@lists.alioth.debian.org>
-Uploaders: Roberto C. Sanchez <robe...@debian.org>
+Uploaders: Ernesto Hernández-Novich (USB) <e...@usb.ve>,
+ Nathan Handler <nhand...@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 <e...@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 <jpie...@cpan.org>
-Scott Thomason <sc...@thomasons.org>
+Format-Specification: 
http://svn.debian.org/wsvn/dep/web/deps/dep5.mdwn?op=file&rev=135
+Maintainer: Jerrad Pierce <jpie...@cpan.org>
+Source: http://search.cpan.org/dist/XML-RSSLite/
+Name: XML-RSSLite
 
+Files: *
 Copyright:
+ 2003, 2003, 2009, Jerrad Pierce <jpie...@cpan.org>
+ 2000, Scott Thomason <sc...@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 <e...@telcel.net.ve>
+ 2008, Roberto C. Sanchez <robe...@debian.org>
+ 2009, Nathan Handler <nhand...@ubuntu.com>
+ 2010, Nicholas Bamber <nicho...@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 <m...@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-...@#$%^&*()-+=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>pu...@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>edi...@writetheweb.com</managingEditor> 
-               <webMaster>webmas...@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 via email to