Suggestions.pm - bugfix need CGI argument to gettemplate
Signed-off-by: Chris Cormack <crc@liblime.com> Signed-off-by: Joshua Ferraro <jmf@liblime.com>
This commit is contained in:
parent
908c515771
commit
c249f6519e
1 changed files with 4 additions and 2 deletions
|
@ -19,10 +19,12 @@ package C4::Suggestions;
|
|||
|
||||
|
||||
use strict;
|
||||
use CGI;
|
||||
use Mail::Sendmail;
|
||||
|
||||
use C4::Context;
|
||||
use C4::Output;
|
||||
use C4::Dates qw(format_date);
|
||||
use Mail::Sendmail;
|
||||
use vars qw($VERSION @ISA @EXPORT);
|
||||
|
||||
BEGIN {
|
||||
|
@ -385,7 +387,7 @@ sub ModStatus {
|
|||
$sth = $dbh->prepare($queryMail);
|
||||
$sth->execute($suggestionid);
|
||||
my $emailinfo = $sth->fetchrow_hashref;
|
||||
my $template = gettemplate("suggestion/mail_suggestion_$status.tmpl","intranet");
|
||||
my $template = gettemplate("suggestion/mail_suggestion_$status.tmpl", "intranet", CGI->new());
|
||||
|
||||
$template->param(
|
||||
byemail => $emailinfo->{byemail},
|
||||
|
|
Loading…
Reference in a new issue