r5806 - in /packages/libmarc-xml-perl/trunk: META.yml debian/changelog debian/control lib/MARC/File/XML.pm

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

Author: gregoa-guest
Date: Sat Jul 14 22:40:38 2007
New Revision: 5806

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=5806
Log:
* New upstream release.
* Tigthen dependency on libmarc-charset-perl to >= 0.97-2 because of
  #429008 and #429030.

Modified:
    packages/libmarc-xml-perl/trunk/META.yml
    packages/libmarc-xml-perl/trunk/debian/changelog
    packages/libmarc-xml-perl/trunk/debian/control
    packages/libmarc-xml-perl/trunk/lib/MARC/File/XML.pm

Modified: packages/libmarc-xml-perl/trunk/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libmarc-xml-perl/trunk/META.yml?rev=5806&op=diff
==============================================================================
--- packages/libmarc-xml-perl/trunk/META.yml (original)
+++ packages/libmarc-xml-perl/trunk/META.yml Sat Jul 14 22:40:38 2007
@@ -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:         MARC-XML
-version:      0.86
+version:      0.87
 version_from: lib/MARC/File/XML.pm
 installdirs:  site
 requires:

Modified: packages/libmarc-xml-perl/trunk/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libmarc-xml-perl/trunk/debian/changelog?rev=5806&op=diff
==============================================================================
--- packages/libmarc-xml-perl/trunk/debian/changelog (original)
+++ packages/libmarc-xml-perl/trunk/debian/changelog Sat Jul 14 22:40:38 2007
@@ -1,8 +1,10 @@
-libmarc-xml-perl (0.86-2) UNRELEASED; urgency=low
+libmarc-xml-perl (0.87-1) unstable; urgency=low
 
-  * NOT RELEASED YET
+  * New upstream release.
+  * Tigthen dependency on libmarc-charset-perl to >= 0.97-2 because of
+    #429008 and #429030.
 
- -- Damyan Ivanov <dmn at debian.org>  Tue, 22 May 2007 12:58:42 +0300
+ -- gregor herrmann <gregor+debian at comodo.priv.at>  Sun, 15 Jul 2007 00:37:37 +0200
 
 libmarc-xml-perl (0.86-1) unstable; urgency=low
 

Modified: packages/libmarc-xml-perl/trunk/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libmarc-xml-perl/trunk/debian/control?rev=5806&op=diff
==============================================================================
--- packages/libmarc-xml-perl/trunk/debian/control (original)
+++ packages/libmarc-xml-perl/trunk/debian/control Sat Jul 14 22:40:38 2007
@@ -4,7 +4,7 @@
 Build-Depends: debhelper (>= 5.0.0), cdbs (>= 0.4.27-1), quilt, 
  patchutils (>= 0.2.25)
 Build-Depends-Indep: perl (>= 5.8.8-7), libxml-sax-perl (>= 0.12), 
- libmarc-charset-perl (>= 0.91), libmarc-record-perl (>= 1.36)
+ libmarc-charset-perl (>= 0.97-2), libmarc-record-perl (>= 1.36)
 Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
 Uploaders: Vincent Danjean <vdanjean at debian.org>, gregor herrmann <gregor+debian at comodo.priv.at>
 Standards-Version: 3.7.2
@@ -12,7 +12,7 @@
 Package: libmarc-xml-perl
 Architecture: all
 Depends: ${perl:Depends}, ${misc:Depends}, libxml-sax-perl (>= 0.12),
- libmarc-charset-perl (>= 0.91), libmarc-record-perl (>= 1.36)
+ libmarc-charset-perl (>= 0.97-2), libmarc-record-perl (>= 1.36)
 Description: Perl library to access MARC data encoded as XML
  The MARC-XML distribution is an extension to the MARC-Record distribution for
  working with MARC21 data that is encoded as XML. The XML encoding used is the

Modified: packages/libmarc-xml-perl/trunk/lib/MARC/File/XML.pm
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libmarc-xml-perl/trunk/lib/MARC/File/XML.pm?rev=5806&op=diff
==============================================================================
--- packages/libmarc-xml-perl/trunk/lib/MARC/File/XML.pm (original)
+++ packages/libmarc-xml-perl/trunk/lib/MARC/File/XML.pm Sat Jul 14 22:40:38 2007
@@ -14,7 +14,7 @@
 use Carp qw( croak );
 use Encode ();
 
-$VERSION = '0.86';
+$VERSION = '0.87';
 
 my $handler = MARC::File::SAX->new();
 
@@ -504,7 +504,7 @@
 	} elsif ($enc eq '50') {
 		return 'UTF-8';
 	} else {
-		die "Unsupported UNIMARC charater encoding [$enc] for XML output";
+		die "Unsupported UNIMARC character encoding [$enc] for XML output for $f; 100$a -> " . $r->subfield(100 => 'a');
 	}
 }