[Rt-commit] r19505 - in rt/3.999/trunk: .

sunnavy at bestpractical.com sunnavy at bestpractical.com
Thu May 7 03:09:46 EDT 2009


Author: sunnavy
Date: Thu May  7 03:09:46 2009
New Revision: 19505

Modified:
   rt/3.999/trunk/   (props changed)
   rt/3.999/trunk/t/web/crypt-gnupg.t

Log:
 r20367 at sunnavys-mb (orig r18815):  sunnavy | 2009-03-17 09:54:23 +0800
 $RT::rtname => RT->config->get('rtname')


Modified: rt/3.999/trunk/t/web/crypt-gnupg.t
==============================================================================
--- rt/3.999/trunk/t/web/crypt-gnupg.t	(original)
+++ rt/3.999/trunk/t/web/crypt-gnupg.t	Thu May  7 03:09:46 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