r50617 - /trunk/libmoosex-storage-perl/debian/patches/remove-best-dep.patch

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

Author: jawnsy-guest
Date: Sun Jan 10 00:51:14 2010
New Revision: 50617

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=50617
Log:
fix patch to remove exact syntax checks

Modified:
    trunk/libmoosex-storage-perl/debian/patches/remove-best-dep.patch

Modified: trunk/libmoosex-storage-perl/debian/patches/remove-best-dep.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-storage-perl/debian/patches/remove-best-dep.patch?rev=50617&op=diff
==============================================================================
--- trunk/libmoosex-storage-perl/debian/patches/remove-best-dep.patch (original)
+++ trunk/libmoosex-storage-perl/debian/patches/remove-best-dep.patch Sun Jan 10 00:51:14 2010
@@ -18,7 +18,7 @@
  our $AUTHORITY = 'cpan:STEVAN';
 --- a/t/020_basic_yaml.t
 +++ b/t/020_basic_yaml.t
-@@ -5,11 +5,11 @@
+@@ -5,12 +5,12 @@
  
  use Test::More;
  
@@ -29,38 +29,107 @@
      plan skip_all => "Test::YAML::Valid is required for this test" if $@;            
 -    eval "use Best [[qw(YAML::Syck YAML)]]";
 -    plan skip_all => "YAML or YAML::syck and Best are required for this test" if $@;            
-     plan tests => 12;
+-    plan tests => 12;
++    plan tests => 11;
      use_ok('MooseX::Storage');
  }
+ 
+@@ -44,43 +44,6 @@
+     my $yaml = $foo->freeze;
+ 
+     yaml_string_ok( $yaml, '... we got valid YAML out of it' );
+-
+-    is(
+-        $yaml,
+-        q{--- 
+-__CLASS__: Foo
+-array: 
+-  - 1
+-  - 2
+-  - 3
+-  - 4
+-  - 5
+-  - 6
+-  - 7
+-  - 8
+-  - 9
+-  - 10
+-float: 10.5
+-hash: 
+-  1: ~
+-  10: ~
+-  2: ~
+-  3: ~
+-  4: ~
+-  5: ~
+-  6: ~
+-  7: ~
+-  8: ~
+-  9: ~
+-number: 10
+-object: 
+-  __CLASS__: Foo
+-  number: 2
+-string: foo
+-},
+-        '... got the same YAML'
+-    );
+-
+ }
+ 
+ {
 --- a/t/060_basic_deferred.t
 +++ b/t/060_basic_deferred.t
-@@ -157,9 +157,9 @@
+@@ -12,7 +12,7 @@
+     plan skip_all => "Test::JSON and Test::YAML::Valid are required for this test" if $@;  
+     eval "use JSON::Any";
+     plan skip_all => "JSON::Any is required for this test" if $@;          
+-    plan tests => 33;    
++    plan tests => 32;
+     use_ok('MooseX::Storage');
+ }
  
-     is(
-         $yaml,
+@@ -154,43 +154,6 @@
+     my $yaml = $foo->freeze({ 'format' => 'YAML' });
+ 
+     yaml_string_ok( $yaml, '... we got valid YAML out of it' );
+-
+-    is(
+-        $yaml,
 -        q{--- 
-+        q{---
- __CLASS__: Foo
+-__CLASS__: Foo
 -array: 
-+array:
-   - 1
-   - 2
-   - 3
-@@ -171,7 +171,7 @@
-   - 9
-   - 10
- float: 10.5
+-  - 1
+-  - 2
+-  - 3
+-  - 4
+-  - 5
+-  - 6
+-  - 7
+-  - 8
+-  - 9
+-  - 10
+-float: 10.5
 -hash: 
-+hash:
-   1: ~
-   10: ~
-   2: ~
-@@ -183,7 +183,7 @@
-   8: ~
-   9: ~
- number: 10
+-  1: ~
+-  10: ~
+-  2: ~
+-  3: ~
+-  4: ~
+-  5: ~
+-  6: ~
+-  7: ~
+-  8: ~
+-  9: ~
+-number: 10
 -object: 
-+object:
-   __CLASS__: Foo
-   number: 2
- string: foo
+-  __CLASS__: Foo
+-  number: 2
+-string: foo
+-},
+-        '... got the same YAML'
+-    );
+-
+ }
+ 
+ {