r27382 - in /branches/upstream/libxml-atom-perl/current: .shipit Changes MANIFEST META.yml lib/XML/Atom.pm lib/XML/Atom/Base.pm lib/XML/Atom/Entry.pm lib/XML/Atom/Feed.pm

gregoa at users.alioth.debian.org gregoa at users.alioth.debian.org
Fri Nov 28 19:56:55 UTC 2008


Author: gregoa
Date: Fri Nov 28 19:56:52 2008
New Revision: 27382

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=27382
Log:
[svn-upgrade] Integrating new upstream version, libxml-atom-perl (0.32)

Added:
    branches/upstream/libxml-atom-perl/current/.shipit
Modified:
    branches/upstream/libxml-atom-perl/current/Changes
    branches/upstream/libxml-atom-perl/current/MANIFEST
    branches/upstream/libxml-atom-perl/current/META.yml
    branches/upstream/libxml-atom-perl/current/lib/XML/Atom.pm
    branches/upstream/libxml-atom-perl/current/lib/XML/Atom/Base.pm
    branches/upstream/libxml-atom-perl/current/lib/XML/Atom/Entry.pm
    branches/upstream/libxml-atom-perl/current/lib/XML/Atom/Feed.pm

Added: branches/upstream/libxml-atom-perl/current/.shipit
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-atom-perl/current/.shipit?rev=27382&op=file
==============================================================================
--- branches/upstream/libxml-atom-perl/current/.shipit (added)
+++ branches/upstream/libxml-atom-perl/current/.shipit Fri Nov 28 19:56:52 2008
@@ -1,0 +1,7 @@
+steps = FindVersion, ChangeVersion, CheckChangeLog, DistTest, Commit, Tag, MakeDist, UploadCPAN
+
+# if directory, where the normal "make dist" puts its file.
+#MakeDist.destination = ~/shipit-dist
+#svn.tagpattern = ShipIt-%v
+
+#CheckChangeLog.files = ChangeLog

Modified: branches/upstream/libxml-atom-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-atom-perl/current/Changes?rev=27382&op=diff
==============================================================================
--- branches/upstream/libxml-atom-perl/current/Changes (original)
+++ branches/upstream/libxml-atom-perl/current/Changes Fri Nov 28 19:56:52 2008
@@ -1,6 +1,10 @@
-$Id: Changes 104 2008-11-13 21:18:54Z miyagawa $
+$Id: Changes 107 2008-11-23 22:06:11Z miyagawa $
 
 Revision history for XML::Atom
+
+0.32  2008.11.23
+    * Added base and lang to Entry and Feed object. Fixed xml:base attributes.
+      (Simon Wistow)
 
 0.31  2008.11.13
     * Update Content-Type in XML::Atom::Client when the entity's version >= 1.0

Modified: branches/upstream/libxml-atom-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-atom-perl/current/MANIFEST?rev=27382&op=diff
==============================================================================
--- branches/upstream/libxml-atom-perl/current/MANIFEST (original)
+++ branches/upstream/libxml-atom-perl/current/MANIFEST Fri Nov 28 19:56:52 2008
@@ -1,3 +1,4 @@
+.shipit
 Changes
 inc/Module/AutoInstall.pm
 inc/Module/Install.pm
@@ -46,6 +47,7 @@
 t/24-bad-content.t
 t/25-utf8-create.t
 t/27-client-leaks.t
+t/28-ext.t
 t/samples/atom-1.0.xml
 t/samples/entry-euc.xml
 t/samples/entry-full.xml
@@ -56,4 +58,3 @@
 t/samples/me.jpg
 t/samples/vox.xml
 t/TestLib.pm
-t/28-ext.t

Modified: branches/upstream/libxml-atom-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-atom-perl/current/META.yml?rev=27382&op=diff
==============================================================================
--- branches/upstream/libxml-atom-perl/current/META.yml (original)
+++ branches/upstream/libxml-atom-perl/current/META.yml Fri Nov 28 19:56:52 2008
@@ -21,4 +21,4 @@
   XML::LibXML: 1.64
 resources:
   license: http://dev.perl.org/licenses/
-version: 0.31
+version: 0.32

Modified: branches/upstream/libxml-atom-perl/current/lib/XML/Atom.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-atom-perl/current/lib/XML/Atom.pm?rev=27382&op=diff
==============================================================================
--- branches/upstream/libxml-atom-perl/current/lib/XML/Atom.pm (original)
+++ branches/upstream/libxml-atom-perl/current/lib/XML/Atom.pm Fri Nov 28 19:56:52 2008
@@ -1,9 +1,9 @@
-# $Id: Atom.pm 104 2008-11-13 21:18:54Z miyagawa $
+# $Id: Atom.pm 107 2008-11-23 22:06:11Z miyagawa $
 
 package XML::Atom;
 use strict;
 
-our $VERSION = '0.31';
+our $VERSION = '0.32';
 
 BEGIN {
     @XML::Atom::EXPORT = qw( LIBXML );

Modified: branches/upstream/libxml-atom-perl/current/lib/XML/Atom/Base.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-atom-perl/current/lib/XML/Atom/Base.pm?rev=27382&op=diff
==============================================================================
--- branches/upstream/libxml-atom-perl/current/lib/XML/Atom/Base.pm (original)
+++ branches/upstream/libxml-atom-perl/current/lib/XML/Atom/Base.pm Fri Nov 28 19:56:52 2008
@@ -1,4 +1,4 @@
-# $Id: Base.pm 103 2008-11-13 21:17:30Z miyagawa $
+# $Id: Base.pm 106 2008-11-14 22:04:41Z swistow $
 
 package XML::Atom::Base;
 use strict;
@@ -260,7 +260,7 @@
                     $elem->setAttributeNS('http://www.w3.org/XML/1998/namespace',
                                           $attr, $_[0]);
                 }
-                return $elem->getAttributeNS('http://www.w3.org/XML/1998/namespace', $attr);
+                return $elem->getAttribute("xml:$attr");
             } else {
                 if (@_) {
                     $obj->elem->setAttribute("xml:$attr", $_[0]);

Modified: branches/upstream/libxml-atom-perl/current/lib/XML/Atom/Entry.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-atom-perl/current/lib/XML/Atom/Entry.pm?rev=27382&op=diff
==============================================================================
--- branches/upstream/libxml-atom-perl/current/lib/XML/Atom/Entry.pm (original)
+++ branches/upstream/libxml-atom-perl/current/lib/XML/Atom/Entry.pm Fri Nov 28 19:56:52 2008
@@ -1,4 +1,4 @@
-# $Id: Entry.pm 52 2006-08-16 05:38:26Z miyagawa $
+# $Id: Entry.pm 106 2008-11-14 22:04:41Z swistow $
 
 package XML::Atom::Entry;
 use strict;
@@ -25,6 +25,7 @@
 }
 
 __PACKAGE__->mk_elem_accessors(qw( summary source ));
+__PACKAGE__->mk_xml_attr_accessors(qw( lang base ));
 
 __PACKAGE__->_rename_elements('issued' => 'published');
 __PACKAGE__->_rename_elements('modified' => 'updated');

Modified: branches/upstream/libxml-atom-perl/current/lib/XML/Atom/Feed.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-atom-perl/current/lib/XML/Atom/Feed.pm?rev=27382&op=diff
==============================================================================
--- branches/upstream/libxml-atom-perl/current/lib/XML/Atom/Feed.pm (original)
+++ branches/upstream/libxml-atom-perl/current/lib/XML/Atom/Feed.pm Fri Nov 28 19:56:52 2008
@@ -1,4 +1,4 @@
-# $Id: Feed.pm 70 2006-09-16 06:39:51Z miyagawa $
+# $Id: Feed.pm 106 2008-11-14 22:04:41Z swistow $
 
 package XML::Atom::Feed;
 use strict;
@@ -67,23 +67,8 @@
 }
 
 sub element_name { 'feed' }
-
-sub language {
-    my $feed = shift;
-    if (LIBXML) {
-        my $elem = $feed->elem;
-        if (@_) {
-            $elem->setAttributeNS('http://www.w3.org/XML/1998/namespace',
-                'lang', $_[0]);
-        }
-        return $elem->getAttributeNS('http://www.w3.org/XML/1998/namespace', 'lang');
-    } else {
-        if (@_) {
-            $feed->elem->setAttribute('xml:lang', $_[0]);
-        }
-        return $feed->elem->getAttribute('xml:lang');
-    }
-}
+*language = \⟨ # legacy
+
 
 sub version {
     my $feed = shift;
@@ -152,6 +137,7 @@
 }
 
 __PACKAGE__->mk_elem_accessors(qw( generator ));
+__PACKAGE__->mk_xml_attr_accessors(qw( lang base ));
 
 __PACKAGE__->_rename_elements('modified' => 'updated');
 __PACKAGE__->_rename_elements('tagline' => 'subtitle');




More information about the Pkg-perl-cvs-commits mailing list