[otrs-cvs] ITSMConfigItem/scripts/test ITSMConfigItem.t,1.2,1.3

[CVS commits notifications of OTRS.org]

Comments:
Update of /home/cvs/ITSMConfigItem/scripts/test
In directory lancelot:/tmp/cvs-serv10847/scripts/test

Modified Files:
	ITSMConfigItem.t 
Log Message:
Added more unittests.

Author: mh

Index: ITSMConfigItem.t
===================================================================
RCS file: /home/cvs/ITSMConfigItem/scripts/test/ITSMConfigItem.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** ITSMConfigItem.t	26 Apr 2008 11:59:11 -0000	1.2
--- ITSMConfigItem.t	2 May 2008 12:56:57 -0000	1.3
***************
*** 19,25 ****
--- 19,27 ----
  use Kernel::System::GeneralCatalog;
  use Kernel::System::ITSMConfigItem;
+ use Kernel::System::User;
  
  $Self->{GeneralCatalogObject} = Kernel::System::GeneralCatalog->new( %{$Self} );
  $Self->{ConfigItemObject}     = Kernel::System::ITSMConfigItem->new( %{$Self} );
+ $Self->{UserObject}           = Kernel::System::User->new( %{$Self} );
  
  # ------------------------------------------------------------ #
[...964 lines suppressed...]
+     # turn off all pretty print
+     $Data::Dumper::Indent = 0;
+ 
+     # dump the list from ConfigItemSearchExtended()
+     my $ConfigItemString = Data::Dumper::Dumper($ConfigItemList);
+ 
+     # dump the reference string
+     my $ReferenceString = Data::Dumper::Dumper( \@ReferenceList );
+ 
+     # check arrays
+     $Self->Is(
+         $ConfigItemString,
+         $ReferenceString,
+         "Test $TestCount: ConfigItemSearchExtended() - List",
+     );
+ }
+ 
+ # ------------------------------------------------------------ #
  # clean the system
  # ------------------------------------------------------------ #