summaryrefslogtreecommitdiff
path: root/rt/lib/RT/Action/NotifyAsComment.pm
diff options
context:
space:
mode:
authorivan <ivan>2010-05-18 18:49:59 +0000
committerivan <ivan>2010-05-18 18:49:59 +0000
commite70abd21bab68b23488f7ef1ee2e693a3b365691 (patch)
tree75986ffa9ba6ab4f961f9033468a1344e1653408 /rt/lib/RT/Action/NotifyAsComment.pm
parentb4b0c7e72d7eaee2fbfc7022022c9698323203dd (diff)
import rt 3.8.8
Diffstat (limited to 'rt/lib/RT/Action/NotifyAsComment.pm')
-rwxr-xr-xrt/lib/RT/Action/NotifyAsComment.pm19
1 files changed, 9 insertions, 10 deletions
diff --git a/rt/lib/RT/Action/NotifyAsComment.pm b/rt/lib/RT/Action/NotifyAsComment.pm
index b2eb5ac..4380c86 100755
--- a/rt/lib/RT/Action/NotifyAsComment.pm
+++ b/rt/lib/RT/Action/NotifyAsComment.pm
@@ -47,27 +47,27 @@
# END BPS TAGGED BLOCK }}}
package RT::Action::NotifyAsComment;
-require RT::Action::Notify;
use strict;
use warnings;
+
use base qw(RT::Action::Notify);
=head2 SetReturnAddress
-Tell SendEmail that this message should come out as a comment.
+Tell SendEmail that this message should come out as a comment.
Calls SUPER::SetReturnAddress.
=cut
sub SetReturnAddress {
- my $self = shift;
-
- # Tell RT::Action::SendEmail that this should come
- # from the relevant comment email address.
- $self->{'comment'} = 1;
-
- return($self->SUPER::SetReturnAddress(is_comment => 1));
+ my $self = shift;
+
+ # Tell RT::Action::SendEmail that this should come
+ # from the relevant comment email address.
+ $self->{'comment'} = 1;
+
+ return $self->SUPER::SetReturnAddress( @_, is_comment => 1 );
}
eval "require RT::Action::NotifyAsComment_Vendor";
@@ -76,4 +76,3 @@ eval "require RT::Action::NotifyAsComment_Local";
die $@ if ($@ && $@ !~ qr{^Can't locate RT/Action/NotifyAsComment_Local.pm});
1;
-