r58650 - in /branches/upstream/libyaml-syck-perl/current: Changes MANIFEST META.yml Makefile.PL lib/JSON/Syck.pm lib/YAML/Syck.pm perl_syck.h t/bug/ t/bug/rt-54167.t

gregoa at users.alioth.debian.org gregoa at users.alioth.debian.org
Sun May 30 18:44:45 UTC 2010


Author: gregoa
Date: Sun May 30 18:44:38 2010
New Revision: 58650

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=58650
Log:
[svn-upgrade] Integrating new upstream version, libyaml-syck-perl (1.09)

Added:
    branches/upstream/libyaml-syck-perl/current/t/bug/
    branches/upstream/libyaml-syck-perl/current/t/bug/rt-54167.t
Modified:
    branches/upstream/libyaml-syck-perl/current/Changes
    branches/upstream/libyaml-syck-perl/current/MANIFEST
    branches/upstream/libyaml-syck-perl/current/META.yml
    branches/upstream/libyaml-syck-perl/current/Makefile.PL
    branches/upstream/libyaml-syck-perl/current/lib/JSON/Syck.pm
    branches/upstream/libyaml-syck-perl/current/lib/YAML/Syck.pm
    branches/upstream/libyaml-syck-perl/current/perl_syck.h

Modified: branches/upstream/libyaml-syck-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libyaml-syck-perl/current/Changes?rev=58650&op=diff
==============================================================================
--- branches/upstream/libyaml-syck-perl/current/Changes (original)
+++ branches/upstream/libyaml-syck-perl/current/Changes Sun May 30 18:44:38 2010
@@ -1,3 +1,16 @@
+[Changes for 1.09 (JSON::Syck 0.32) - 2010-05-29]
+
+* Exactly equivalent to 1.08_01, aside from bumping the version
+  numbers
+
+[Changes for 1.08_01 (JSON::Syck 0.31_01) - 2010-05-23]
+
+* Reset the hash iterator after dumping hashes. Solves RT #54167 and
+  the duplicate RT #34166.
+
+* RT #39572: Only print 0.60 compatibility warning if 0.60 or earlier
+  is installed.
+
 [Changes for 1.08 (JSON::Syck 0.31) - 2010-05-23]
 
 Like the 1.07_01 test release aside from small documentation

Modified: branches/upstream/libyaml-syck-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libyaml-syck-perl/current/MANIFEST?rev=58650&op=diff
==============================================================================
--- branches/upstream/libyaml-syck-perl/current/MANIFEST (original)
+++ branches/upstream/libyaml-syck-perl/current/MANIFEST Sun May 30 18:44:38 2010
@@ -47,6 +47,7 @@
 t/2-scalars.t
 t/3-objects.t
 t/4-perl_tag_scheme.t
+t/bug/rt-54167.t
 t/json-basic.t
 t/json-circular-ref.t
 t/json-crlf.t

Modified: branches/upstream/libyaml-syck-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libyaml-syck-perl/current/META.yml?rev=58650&op=diff
==============================================================================
--- branches/upstream/libyaml-syck-perl/current/META.yml (original)
+++ branches/upstream/libyaml-syck-perl/current/META.yml Sun May 30 18:44:38 2010
@@ -25,4 +25,4 @@
   homepage: http://search.cpan.org/dist/YAML-Syck
   license: http://opensource.org/licenses/mit-license.php
   repository: http://github.com/avar/YAML-Syck
-version: 1.08
+version: 1.09

Modified: branches/upstream/libyaml-syck-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libyaml-syck-perl/current/Makefile.PL?rev=58650&op=diff
==============================================================================
--- branches/upstream/libyaml-syck-perl/current/Makefile.PL (original)
+++ branches/upstream/libyaml-syck-perl/current/Makefile.PL Sun May 30 18:44:38 2010
@@ -1,17 +1,6 @@
 use strict;
 use lib '.';
 use inc::Module::Install;
-
-print << '_';
-
-*** WARNING ***
-
-YAML::Syck version >=0.60 breaks compatibility with earlier versions of
-YAML::Syck and YAML.pm (<0.60) when serializing blessed references.
-
-See the COMPATIBILITY file for more information.
-
-_
 
 my $bad;
 if (eval { require YAML; $YAML::VERSION < 0.60 }) {
@@ -24,6 +13,17 @@
 }
 
 if ($bad and !is_admin()) {
+    print << '_';
+
+*** WARNING ***
+
+YAML::Syck version >=0.60 breaks compatibility with earlier versions of
+YAML::Syck and YAML.pm (<0.60) when serializing blessed references.
+
+See the COMPATIBILITY file for more information.
+
+_
+
     exit() unless prompt("Continue installing YAML::Syck?", 'y') =~ /^y/i;
 }
 
@@ -43,4 +43,5 @@
 homepage        'http://search.cpan.org/dist/YAML-Syck';
 repository      'http://github.com/avar/YAML-Syck';
 bugtracker      'https://rt.cpan.org/Public/Dist/Display.html?Name=YAML-Syck';
+tests           't/*.t t/*/*.t';
 WriteAll;

Modified: branches/upstream/libyaml-syck-perl/current/lib/JSON/Syck.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libyaml-syck-perl/current/lib/JSON/Syck.pm?rev=58650&op=diff
==============================================================================
--- branches/upstream/libyaml-syck-perl/current/lib/JSON/Syck.pm (original)
+++ branches/upstream/libyaml-syck-perl/current/lib/JSON/Syck.pm Sun May 30 18:44:38 2010
@@ -5,7 +5,7 @@
 use YAML::Syck ();
 
 BEGIN {
-    $VERSION    = '0.31';
+    $VERSION    = '0.32';
     @EXPORT_OK  = qw( Load Dump LoadFile DumpFile );
     @ISA        = 'Exporter';
     *Load       = \&YAML::Syck::LoadJSON;

Modified: branches/upstream/libyaml-syck-perl/current/lib/YAML/Syck.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libyaml-syck-perl/current/lib/YAML/Syck.pm?rev=58650&op=diff
==============================================================================
--- branches/upstream/libyaml-syck-perl/current/lib/YAML/Syck.pm (original)
+++ branches/upstream/libyaml-syck-perl/current/lib/YAML/Syck.pm Sun May 30 18:44:38 2010
@@ -13,7 +13,7 @@
 use Exporter;
 
 BEGIN {
-    $VERSION = '1.08';
+    $VERSION = '1.09';
     @EXPORT  = qw( Dump Load DumpFile LoadFile );
     @ISA     = qw( Exporter );
 

Modified: branches/upstream/libyaml-syck-perl/current/perl_syck.h
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libyaml-syck-perl/current/perl_syck.h?rev=58650&op=diff
==============================================================================
--- branches/upstream/libyaml-syck-perl/current/perl_syck.h (original)
+++ branches/upstream/libyaml-syck-perl/current/perl_syck.h Sun May 30 18:44:38 2010
@@ -973,6 +973,8 @@
                         syck_emit_item( e, (st_data_t)val );
                     }
                 }
+                // reset hash each poiter
+                hv_iterinit(hv);
                 syck_emit_end(e);
                 return;
             }

Added: branches/upstream/libyaml-syck-perl/current/t/bug/rt-54167.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libyaml-syck-perl/current/t/bug/rt-54167.t?rev=58650&op=file
==============================================================================
--- branches/upstream/libyaml-syck-perl/current/t/bug/rt-54167.t (added)
+++ branches/upstream/libyaml-syck-perl/current/t/bug/rt-54167.t Sun May 30 18:44:38 2010
@@ -1,0 +1,39 @@
+#!/usr/bin/env perl
+
+use warnings;
+use strict;
+
+use Test::More tests => 2;
+
+use YAML::Syck;
+
+my $some_hashref = { a => 1, b => 2 };
+my $expected_iterations = scalar keys %$some_hashref;
+
+is(
+  count_each_iterations($some_hashref),
+  $expected_iterations,
+  "each() iterates properly before YAML::Syck::Dump",
+);
+
+# Perform the Dump.
+my $some_yaml_dump = YAML::Syck::Dump($some_hashref);
+
+is(
+  count_each_iterations($some_hashref),
+  $expected_iterations,
+  "each() iterates properly after YAML::Syck::Dump",
+);
+
+exit;
+
+sub count_each_iterations {
+  my $hashref = shift;
+
+  my $iterations = 0;
+  while (my ($k, $v) = each %$hashref) {
+    $iterations++;
+  }
+
+  return $iterations;
+}




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