[otrs-cvs] otrs/scripts/test/GenericInterface WebserviceConfig.t, 1.12, 1.13
"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/GenericInterface
In directory lancelot:/tmp/cvs-serv1962/scripts/test/GenericInterface
Modified Files:
WebserviceConfig.t
Log Message:
Enhanced test.
Author: cr
Index: WebserviceConfig.t
===================================================================
RCS file: /home/cvs/otrs/scripts/test/GenericInterface/WebserviceConfig.t,v
retrieving revision 1.12
retrieving revision 1.13
diff -2 -u -d -r1.12 -r1.13
--- WebserviceConfig.t 15 Jan 2013 23:25:44 -0000 1.12
+++ WebserviceConfig.t 16 Jan 2013 03:27:13 -0000 1.13
@@ -223,10 +223,8 @@
Mode => 'utf8',
);
-
my $OriginalContent = eval { Kernel::System::YAML::Load( ${$Content} ) };
my $ResultContent = eval { Kernel::System::YAML::Load($WebserviceConfigResult) };
- $OriginalContent = Kernel::System::YAML::Dump($OriginalContent);
- $ResultContent = Kernel::System::YAML::Dump($ResultContent);
- $Self->Is(
+
+ $Self->IsDeeply(
$OriginalContent,
$ResultContent,
@@ -272,10 +270,10 @@
$OriginalContent = eval { Kernel::System::YAML::Load( ${$Content} ) };
$ResultContent = eval { Kernel::System::YAML::Load($WebserviceConfigResult) };
- $Self->Is(
- $ResultContent,
+
+ $Self->IsDeeply(
$OriginalContent,
+ $ResultContent,
"$Test->{Name} - Compare update file with result",
);
-
}
---------------------------------------------------------------------
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