[otrs-cvs] otrs/scripts/test/CPAN YAML.t,1.11,1.12

Comments:
Update of /home/cvs/otrs/scripts/test/CPAN
In directory lancelot:/tmp/cvs-serv17880/scripts/test/CPAN

Modified Files:
	YAML.t 
Log Message:
Improved unicode handling, added tests.

Author: mg

Index: YAML.t
===================================================================
RCS file: /home/cvs/otrs/scripts/test/CPAN/YAML.t,v
retrieving revision 1.11
retrieving revision 1.12
diff -2 -u -d -r1.11 -r1.12
--- YAML.t	15 Jan 2013 17:43:26 -0000	1.11
+++ YAML.t	16 Jan 2013 07:41:25 -0000	1.12
@@ -35,5 +35,5 @@
                 undef,
                 'Teststring <tag> äß@ø " \\" \' \'\'',
-            ], 
+            ],
         },
     },
@@ -43,4 +43,22 @@
     },
     {
+        Name => 'UTF8 string',
+        Data => 'kéy',
+    },
+    {
+        Name => 'UTF8 string, loader',
+        Data => 'kéy',
+        YAMLString => '--- kéy' . "\n",
+    },
+    {
+        Name => 'UTF8 string without UTF8-Flag',
+        Data => 'k\x{e9}y',
+    },
+    {
+        Name => 'UTF8 string without UTF8-Flag, loader',
+        Data => 'k\x{e9}y',
+        YAMLString => '--- k\x{e9}y' . "\n",
+    },
+    {
         Name => 'Very long string', # see https://bugzilla.redhat.com/show_bug.cgi?id=19240_0000
         Data => 'äø<>"\'' x 40_000,
@@ -51,5 +69,5 @@
     my $YAMLString = $Test->{YAMLString} || Kernel::System::YAML::Dump( $Test->{Data} );
     my $YAMLData   = Kernel::System::YAML::Load( $YAMLString );
-    
+
     $Self->IsDeeply(
         $YAMLData,

---------------------------------------------------------------------
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