[otrs-cvs] otrs/scripts/test/GenericInterface WebserviceConfig.t, 1.15, 1.16

Comments:
Update of /home/cvs/otrs/scripts/test/GenericInterface
In directory lancelot:/tmp/cvs-serv9398/scripts/test/GenericInterface

Modified Files:
	WebserviceConfig.t 
Log Message:
Re-implemented Kernel::System::YAML as OOP.

Author: cr

Index: WebserviceConfig.t
===================================================================
RCS file: /home/cvs/otrs/scripts/test/GenericInterface/WebserviceConfig.t,v
retrieving revision 1.15
retrieving revision 1.16
diff -2 -u -d -r1.15 -r1.16
--- WebserviceConfig.t	16 Jan 2013 21:44:50 -0000	1.15
+++ WebserviceConfig.t	17 Jan 2013 03:39:21 -0000	1.16
@@ -29,4 +29,9 @@
     $WebserviceConfig = "\"$^X\" " . $Home . '/bin/otrs.WebserviceConfig.pl';
 }
+my $ConfigObject = Kernel::Config->new();
+my $YAMLObject   = Kernel::System::YAML->new(
+    %{$Self},
+    ConfigObject => $ConfigObject,
+);
 
 my $RandomNumber = int( rand(1000000) );
@@ -222,6 +227,6 @@
         Location => $Test->{FileAdd},
     );
-    my $OriginalContent = Kernel::System::YAML::Load( ${$Content} );
-    my $ResultContent   = Kernel::System::YAML::Load($WebserviceConfigResult);
+    my $OriginalContent = $YAMLObject->Load( Data => ${$Content} );
+    my $ResultContent   = $YAMLObject->Load( Data => $WebserviceConfigResult );
 
     $Self->IsDeeply(
@@ -266,6 +271,6 @@
         Location => $Test->{FileUpdate},
     );
-    $OriginalContent = Kernel::System::YAML::Load( ${$Content} );
-    $ResultContent   = Kernel::System::YAML::Load($WebserviceConfigResult);
+    $OriginalContent = $YAMLObject->Load( Data => ${$Content} );
+    $ResultContent   = $YAMLObject->Load( Data => $WebserviceConfigResult );
 
     $Self->IsDeeply(
---------------------------------------------------------------------
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