diff options
Diffstat (limited to 'contrib')
| -rwxr-xr-x | contrib/scripts/vmail.cgi | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/contrib/scripts/vmail.cgi b/contrib/scripts/vmail.cgi index fb22f116e..7a3113e82 100755 --- a/contrib/scripts/vmail.cgi +++ b/contrib/scripts/vmail.cgi @@ -672,7 +672,7 @@ sub file_copy() sub message_copy() { - my ($mbox, $oldfolder, $old, $newmbox, $new) = @_; + my ($mbox, $newmbox, $oldfolder, $old, $new) = @_; my $oldfile, $newfile; return if ($mbox eq $newmbox); @@ -788,7 +788,7 @@ sub message_forward() # print header; foreach $msg (@msgs) { # print "Forwarding $msg from $mbox to $newmbox<BR>\n"; - &message_copy($context, $mbox, $folder, $msg, $newmbox, sprintf "%04d", $msgcount); + &message_copy($mbox, $newmbox, $folder, $msg, sprintf "%04d", $msgcount); $msgcount++; } $txt = "Forwarded messages " . join(', ', @msgs) . "to $newmbox"; |