[otrs-cvs] otrs/scripts/test/CPAN YAML.t,1.8,1.9

"CVS commits notifications of OTRS.org" <[email protected]>
Newsgroups gmane.comp.otrs.cvs
Message-ID <[email protected]>
Comments:
Update of /home/cvs/otrs/scripts/test/CPAN
In directory lancelot:/tmp/cvs-serv22139/scripts/test/CPAN

Modified Files:
	YAML.t 
Log Message:
Revert changes to YAML as they break other things.

Author: mg

Index: YAML.t
===================================================================
RCS file: /home/cvs/otrs/scripts/test/CPAN/YAML.t,v
retrieving revision 1.8
retrieving revision 1.9
diff -2 -u -d -r1.8 -r1.9
--- YAML.t	15 Jan 2013 11:41:59 -0000	1.8
+++ YAML.t	15 Jan 2013 15:04:21 -0000	1.9
@@ -15,5 +15,5 @@
 use utf8;
 
-use YAML;
+use YAML::XS;
 
 my @Tests = (
@@ -39,4 +39,8 @@
     },
     {
+        Name => 'Special YAML chars',
+        Data => ' a " a " a \'\' a \'\' a',
+    },
+    {
         Name => 'Very long string', # see https://bugzilla.redhat.com/show_bug.cgi?id=19240_0000
         Data => 'äø<>"\'' x 40_000,
@@ -45,10 +49,10 @@
 
 for my $Test (@Tests) {
-    my $YAMLString = $Test->{YAMLString} || YAML::Dump( $Test->{Data} );
-    my $YAMLData   = YAML::Load( $YAMLString );
+    my $YAMLString = $Test->{YAMLString} || Dump( $Test->{Data} );
+    my $YAMLData   = Load( $YAMLString );
     
     $Self->IsDeeply(
-        $Test->{Data},
         $YAMLData,
+        $Test->{Data},
         $Test->{Name},
     );

---------------------------------------------------------------------
OTRS mailing list: cvs-log - Webpage: http://otrs.org/
Archive: http://lists.otrs.org/pipermail/cvs-log
To unsubscribe: http://lists.otrs.org/cgi-bin/listinfo/cvs-log
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.