Commit 1b3157c6 authored by sikeda's avatar sikeda
Browse files

[-dev] Fix a wrapper function in ext packages.


git-svn-id: https://subversion.renater.fr/sympa/branches/sympa-6.2-branch@12584 05aa8bb8-cd2b-0410-b1d7-8918dfa770ce
parent 89e06949
......@@ -19,6 +19,7 @@ our %EXPORT_TAGS =
, functions => [@obj, @log]
);
use Sympa;
use Sympa::Report;
=head1 NAME
......@@ -122,14 +123,14 @@ OO wrapper around C<Sympa::Report::notice_report_web()>
=head3 $reporter->rejectPerlEmail(@options);
OO wrapper around C<Sympa::Report::reject_report_msg()>
OO wrapper around C<Sympa::send_notify_to_user()>
=cut
{ package SPU_report;
sub rejectToWeb(@) { my $self = shift; Sympa::Report::reject_report_web(@_) }
sub noticeToWeb(@) { my $self = shift; Sympa::Report::notice_report_web(@_) }
sub rejectPerEmail(@) { my $self = shift; Sympa::Report::reject_report_msg(@_) }
sub rejectPerEmail(@) { my $self = shift; Sympa::send_notify_to_user($_[4], $_[0], $_[2], {%{$_[3]}, entry => $_[1]}) }
}
my $report;
......
......@@ -315,7 +315,7 @@ sub reportListError($$)
reporter->rejectPerEmail
( plugin => 'message_report_voot_failed.tt2', $conf->{user}
, $conf, $list->{'domain'}, '', $list->{'name'}
, $conf, $list
);
1;
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment