[otrs-cvs] GeneralCatalog/scripts/test GeneralCatalog.t,1.13,1.14

[cvs-log at otrs.org]

Comments:
Update of /home/cvs/GeneralCatalog/scripts/test
In directory lancelot:/tmp/cvs-serv22003/scripts/test

Modified Files:
	GeneralCatalog.t 
Log Message:
Improved cleaner mechanism.

Author: mh

Index: GeneralCatalog.t
===================================================================
RCS file: /home/cvs/GeneralCatalog/scripts/test/GeneralCatalog.t,v
retrieving revision 1.13
retrieving revision 1.14
diff -C2 -d -r1.13 -r1.14
*** GeneralCatalog.t	11 Mar 2008 09:33:28 -0000	1.13
--- GeneralCatalog.t	11 Mar 2008 10:02:46 -0000	1.14
***************
*** 729,731 ****
--- 729,738 ----
  );
  
+ # clean the system user table
+ my $UserTable = $Self->{ConfigObject}->Get('DatabaseUserTable') || 'system_user';
+ 
+ $Self->{DBObject}->Do(
+     SQL => "DELETE FROM $UserTable WHERE login LIKE 'UnitTest-GeneralCatalog-%'",
+ );
+ 
  1;