[Rt-commit] r18815 - rt/3.999/branches/config-in-db/t/web

sunnavy at bestpractical.com sunnavy at bestpractical.com
Mon Mar 16 21:54:23 EDT 2009


Author: sunnavy
Date: Mon Mar 16 21:54:23 2009
New Revision: 18815

Modified:
   rt/3.999/branches/config-in-db/t/web/crypt-gnupg.t

Log:
$RT::rtname => RT->config->get('rtname')

Modified: rt/3.999/branches/config-in-db/t/web/crypt-gnupg.t
==============================================================================
--- rt/3.999/branches/config-in-db/t/web/crypt-gnupg.t	(original)
+++ rt/3.999/branches/config-in-db/t/web/crypt-gnupg.t	Mon Mar 16 21:54:23 2009
@@ -59,6 +59,7 @@
 RT::Test->import_gnupg_key('general at example.com.2', 'public');
 RT::Test->import_gnupg_key('general at example.com.2', 'secret');
 
+my $rtname = RT->config->get('rtname');
 ok(my $user = RT::Model::User->new(current_user => RT->system_user));
 ok($user->load('root'), "Loaded user 'root'");
 $user->set_email('recipient at example.com');
@@ -144,7 +145,7 @@
     );
 
     like($attachments[0]->content, qr/Some content/, "RT's mail includes copy of ticket text");
-    like($attachments[0]->content, qr/$RT::rtname/, "RT's mail includes this instance's name");
+    like($attachments[0]->content, qr/$rtname/, "RT's mail includes this instance's name");
 }
 
 $m->get("$baseurl/Admin/Queues/Modify.html?id=$qid");
@@ -216,7 +217,7 @@
     );
 
     like($attachments[0]->content, qr/Some other content/, "RT's mail includes copy of ticket text");
-    like($attachments[0]->content, qr/$RT::rtname/, "RT's mail includes this instance's name");
+    like($attachments[0]->content, qr/$rtname/, "RT's mail includes this instance's name");
 }
 
 $m->get("$baseurl/Admin/Queues/Modify.html?id=$qid");
@@ -289,7 +290,7 @@
     );
 
     like($attachments[0]->content, qr/Some final\? content/, "RT's mail includes copy of ticket text");
-    like($attachments[0]->content, qr/$RT::rtname/, "RT's mail includes this instance's name");
+    like($attachments[0]->content, qr/$rtname/, "RT's mail includes this instance's name");
 }
 
 RT::Test->fetch_caught_mails;
@@ -354,7 +355,7 @@
     );
 
     like($attachments[0]->content, qr/Thought you had me figured out didya/, "RT's mail includes copy of ticket text");
-    like($attachments[0]->content, qr/$RT::rtname/, "RT's mail includes this instance's name");
+    like($attachments[0]->content, qr/$rtname/, "RT's mail includes this instance's name");
 }
 
 sub strip_headers


More information about the Rt-commit mailing list