[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