[Rt-commit] r3087 - in RT-Action-ExtractSubjectTag: . t

[kevinr at bestpractical.com]

Author: kevinr
Date: Tue Jun  7 22:07:19 2005
New Revision: 3087

Modified:
   RT-Action-ExtractSubjectTag/   (props changed)
   RT-Action-ExtractSubjectTag/t/01extract_tags.t
Log:
 r4051 at SAD-GIRL-IN-SNOW:  kevinr | 2005-06-07 22:07:11 -0400
 * changed e-mail addresses to non-routeable addresses 
 * removed unused variable


Modified: RT-Action-ExtractSubjectTag/t/01extract_tags.t
==============================================================================
--- RT-Action-ExtractSubjectTag/t/01extract_tags.t	(original)
+++ RT-Action-ExtractSubjectTag/t/01extract_tags.t	Tue Jun  7 22:07:19 2005
@@ -56,7 +56,7 @@
 
 my $email = 
 ('Subject: [foo.example #12] ExtractSubjectTag test
-From: root at localhost
+From: root at example.com
 To: rt at example.com
 
 Foo Bar,
@@ -76,7 +76,7 @@
 my $ticket = RT::Ticket->new($RT::SystemUser);
 my $transaction_obj;
 ($id, $transaction_obj, $message) 
-   = $ticket->Create(  Requestor   => ['root at localhost'],
+   = $ticket->Create(  Requestor   => ['root at example.com'],
                        Queue       => 'general',
                        Subject     => 'ExtractSubjectTag test',
                     );
@@ -86,7 +86,6 @@
 # add the tag on correspond
 ($id, $message, $transaction_obj) = $ticket->Correspond(MIMEObj=>$parser->Entity);
 ok($id, "conduct transaction? $message");
-my $subject = $ticket->Subject();
 ok($ticket->Subject =~ /\Q[foo.example #12]\E/, "Tag was added to ticket's subject");
 
 1;