[Rt-commit] r5194 - in rt/branches/3.7-EXPERIMENTAL: .

[ruz at bestpractical.com]

Author: ruz
Date: Wed May 10 17:39:38 2006
New Revision: 5194

Added:
   rt/branches/3.7-EXPERIMENTAL/lib/t/regression/14-linking.t
      - copied, changed from r4777, /rt/branches/3.7-EXPERIMENTAL/lib/t/regression/14linking.t
Modified:
   rt/branches/3.7-EXPERIMENTAL/   (props changed)

Log:
 r2835 at cubic-pc:  cubic | 2006-05-10 14:50:21 +0400
 * delete scrip we created before exit


Copied: rt/branches/3.7-EXPERIMENTAL/lib/t/regression/14-linking.t (from r4777, /rt/branches/3.7-EXPERIMENTAL/lib/t/regression/14linking.t)
==============================================================================
--- /rt/branches/3.7-EXPERIMENTAL/lib/t/regression/14linking.t	(original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/t/regression/14-linking.t	Wed May 10 17:39:38 2006
@@ -202,6 +202,13 @@
 # restore
 RT->Config->Set( LinkTransactionsRun1Scrip => $link_scrips_orig );
 
+{
+    my $Scrips = RT::Scrips->new( $RT::SystemUser );
+    $Scrips->Limit( FIELD => 'Description', OPERATOR => 'STARTSWITH', VALUE => 'Add or Delete Link ');
+    while ( my $s = $Scrips->Next ) { $s->Delete };
+}
+
+
 sub link_count {
     my $file = shift;
     open my $fh, "<$file" or die "couldn't open $file";