starting to work...

[freeside.git] / rt / t / shredder / 02template.t

diff --git a/rt/t/shredder/02template.t b/rt/t/shredder/02template.t
index d4c323e..16fa615 100644 (file)
--- a/rt/t/shredder/02template.t
+++ b/rt/t/shredder/02template.t
@@ -15,10 +15,10 @@ BEGIN {
 init_db();
 
 
-diag 'global template' if $ENV{'TEST_VERBOSE'};
+diag 'global template' if $ENV{TEST_VERBOSE};
 {
        create_savepoint('clean');
-    my $template = RT::Template->new( $RT::SystemUser );
+    my $template = RT::Template->new( RT->SystemUser );
     my ($id, $msg) = $template->Create(
         Name => 'my template',
         Content => "\nsome content",
@@ -31,10 +31,10 @@ diag 'global template' if $ENV{'TEST_VERBOSE'};
        cmp_deeply( dump_current_and_savepoint('clean'), "current DB equal to savepoint");
 }
 
-diag 'local template' if $ENV{'TEST_VERBOSE'};
+diag 'local template' if $ENV{TEST_VERBOSE};
 {
        create_savepoint('clean');
-    my $template = RT::Template->new( $RT::SystemUser );
+    my $template = RT::Template->new( RT->SystemUser );
     my ($id, $msg) = $template->Create(
         Name => 'my template',
         Queue => 'General',
@@ -48,10 +48,10 @@ diag 'local template' if $ENV{'TEST_VERBOSE'};
        cmp_deeply( dump_current_and_savepoint('clean'), "current DB equal to savepoint");
 }
 
-diag 'template used in scrip' if $ENV{'TEST_VERBOSE'};
+diag 'template used in scrip' if $ENV{TEST_VERBOSE};
 {
        create_savepoint('clean');
-    my $template = RT::Template->new( $RT::SystemUser );
+    my $template = RT::Template->new( RT->SystemUser );
     my ($id, $msg) = $template->Create(
         Name => 'my template',
         Queue => 'General',
@@ -59,7 +59,7 @@ diag 'template used in scrip' if $ENV{'TEST_VERBOSE'};
     );
     ok($id, 'created template') or diag "error: $msg";
 
-    my $scrip = RT::Scrip->new( $RT::SystemUser );
+    my $scrip = RT::Scrip->new( RT->SystemUser );
     ($id, $msg) = $scrip->Create(
         Description    => 'my scrip',
         Queue          => 'General',