r59188 - in /trunk/libmediawiki-api-perl: Changes META.yml debian/changelog lib/MediaWiki/API.pm

[ansgar-guest at users.alioth.debian.org]

Author: ansgar-guest
Date: Fri Jun 11 14:19:53 2010
New Revision: 59188

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=59188
Log:
New upstream release.

Modified:
    trunk/libmediawiki-api-perl/Changes
    trunk/libmediawiki-api-perl/META.yml
    trunk/libmediawiki-api-perl/debian/changelog
    trunk/libmediawiki-api-perl/lib/MediaWiki/API.pm

Modified: trunk/libmediawiki-api-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmediawiki-api-perl/Changes?rev=59188&op=diff
==============================================================================
--- trunk/libmediawiki-api-perl/Changes (original)
+++ trunk/libmediawiki-api-perl/Changes Fri Jun 11 14:19:53 2010
@@ -1,4 +1,8 @@
 Revision history for MediaWiki-API
+
+0.33    2010-06-09
+        Download function checked for image description, instead of checking for imageinfo. This mean't that some
+        images were not downloaded. Thanks to "ke" for reporting this problem
 
 0.32    2010-06-05
         Config options passed when creating a new instance of the mediawiki api object were overwritten with default

Modified: trunk/libmediawiki-api-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmediawiki-api-perl/META.yml?rev=59188&op=diff
==============================================================================
--- trunk/libmediawiki-api-perl/META.yml (original)
+++ trunk/libmediawiki-api-perl/META.yml Fri Jun 11 14:19:53 2010
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               MediaWiki-API
-version:            0.32
+version:            0.33
 abstract:           Provides a Perl interface to the MediaWiki API (http://www.mediawiki.org/wiki/API)
 author:
     - Jools Wills <buzz at exotica.org.uk>

Modified: trunk/libmediawiki-api-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmediawiki-api-perl/debian/changelog?rev=59188&op=diff
==============================================================================
--- trunk/libmediawiki-api-perl/debian/changelog (original)
+++ trunk/libmediawiki-api-perl/debian/changelog Fri Jun 11 14:19:53 2010
@@ -1,3 +1,9 @@
+libmediawiki-api-perl (0.33-1) unstable; urgency=low
+
+  * New upstream release.
+
+ -- Ansgar Burchardt <ansgar at 43-1.org>  Fri, 11 Jun 2010 23:17:24 +0900
+
 libmediawiki-api-perl (0.32-1) unstable; urgency=low
 
   * New upstream release.

Modified: trunk/libmediawiki-api-perl/lib/MediaWiki/API.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmediawiki-api-perl/lib/MediaWiki/API.pm?rev=59188&op=diff
==============================================================================
--- trunk/libmediawiki-api-perl/lib/MediaWiki/API.pm (original)
+++ trunk/libmediawiki-api-perl/lib/MediaWiki/API.pm Fri Jun 11 14:19:53 2010
@@ -40,11 +40,11 @@
 
 =head1 VERSION
 
-Version 0.32
-
-=cut
-
-our $VERSION  = "0.32";
+Version 0.33
+
+=cut
+
+our $VERSION  = "0.33";
 
 =head1 SYNOPSIS
 
@@ -706,8 +706,8 @@
   # get the page id and the page hashref with title and revisions
   my ( $pageid, $pageref ) = each %{ $ref->{query}->{pages} };
 
-  # if the page is missing then return an empty string
-  return '' if ( defined $pageref->{missing} );
+  # if the image is missing then return an empty string
+  return '' unless ( defined $pageref->{imageinfo} );
 
   my $url = @{ $pageref->{imageinfo} }[0]->{url};