r5056 - in /packages/libmarc-xml-perl/branches/upstream/current: Changes META.yml lib/MARC/File/XML.pm

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

Author: gregoa-guest
Date: Fri Apr 13 19:22:58 2007
New Revision: 5056

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=5056
Log:
[svn-upgrade] Integrating new upstream version, libmarc-xml-perl (0.85)

Modified:
    packages/libmarc-xml-perl/branches/upstream/current/Changes
    packages/libmarc-xml-perl/branches/upstream/current/META.yml
    packages/libmarc-xml-perl/branches/upstream/current/lib/MARC/File/XML.pm

Modified: packages/libmarc-xml-perl/branches/upstream/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libmarc-xml-perl/branches/upstream/current/Changes?rev=5056&op=diff
==============================================================================
--- packages/libmarc-xml-perl/branches/upstream/current/Changes (original)
+++ packages/libmarc-xml-perl/branches/upstream/current/Changes Fri Apr 13 19:22:58 2007
@@ -1,4 +1,10 @@
 Revision history for Perl extension MARC-XML
+0.85 Fri Feb 13 2007
+      - fixed typo in handling of unimarc w/regard to marc8 (ppoulain)
+
+0.84 Mon Nov 26 2006
+      - Fixed UNIMARC encoding detection logic (miker)
+	  - Added UNIMARC Authority support (miker) 
 
 0.83 Fri Apr 21 15:19:20 EST 2006
       - remove premature return from close() thanks Jay Luker (exlibris)

Modified: packages/libmarc-xml-perl/branches/upstream/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libmarc-xml-perl/branches/upstream/current/META.yml?rev=5056&op=diff
==============================================================================
--- packages/libmarc-xml-perl/branches/upstream/current/META.yml (original)
+++ packages/libmarc-xml-perl/branches/upstream/current/META.yml Fri Apr 13 19:22:58 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.83
+version:      0.85
 version_from: lib/MARC/File/XML.pm
 installdirs:  site
 requires:

Modified: packages/libmarc-xml-perl/branches/upstream/current/lib/MARC/File/XML.pm
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libmarc-xml-perl/branches/upstream/current/lib/MARC/File/XML.pm?rev=5056&op=diff
==============================================================================
--- packages/libmarc-xml-perl/branches/upstream/current/lib/MARC/File/XML.pm (original)
+++ packages/libmarc-xml-perl/branches/upstream/current/lib/MARC/File/XML.pm Fri Apr 13 19:22:58 2007
@@ -14,7 +14,7 @@
 use Carp qw( croak );
 use Encode ();
 
-$VERSION = '0.83';
+$VERSION = '0.85';
 
 my $handler = MARC::File::SAX->new();
 
@@ -445,7 +445,7 @@
     $parser->{ tagStack } = [];
     $parser->{ subfields } = [];
     $parser->{ Handler }{ record } = MARC::Record->new();
-    $parser->{ Handler }{ toMARC8 } = (lc($format) ne 'unimarc' && $enc && lc($enc) =~ /^utf-?8$/o) ? 0 : 1;
+    $parser->{ Handler }{ toMARC8 } = (lc($format) eq 'unimarc' && $enc && lc($enc) =~ /^utf-?8$/o) ? 0 : 1;
 
     $parser->parse_string( $text );