From 7cd3bcbff3d7648baeb45e8f5fdff798d5c3c66c Mon Sep 17 00:00:00 2001
From: "jocuri%softhome.net" <>
Date: Tue, 7 Dec 2004 01:08:19 +0000
Subject: [PATCH] Patch for bug 258711: move.pl should honour emailsuffix;
 patch by Marc Schumann <wurblzap@gmail.com>, r=justdave, a=justdave.

---
 move.pl                               | 3 +--
 process_bug.cgi                       | 2 +-
 template/en/default/bug/show.xml.tmpl | 2 +-
 3 files changed, 3 insertions(+), 4 deletions(-)

diff --git a/move.pl b/move.pl
index 1e8036f01c..8218c40699 100755
--- a/move.pl
+++ b/move.pl
@@ -161,8 +161,7 @@ foreach (@fieldlist) {
     $displayfields{$_} = 1;
 }
 
-$template->process("bug/show.xml.tmpl", { user => { login => $exporter },
-                                          bugs => \@bugs,
+$template->process("bug/show.xml.tmpl", { bugs => \@bugs,
                                           displayfields => \%displayfields,
                                         }, \$msg)
   || ThrowTemplateError($template->error());
diff --git a/process_bug.cgi b/process_bug.cgi
index c341dea7ea..d0cc398f93 100755
--- a/process_bug.cgi
+++ b/process_bug.cgi
@@ -559,7 +559,7 @@ if (defined $::FORM{action}) {
   $action = trim($::FORM{action});
 }
 if (Param("move-enabled") && $action eq Param("move-button-text")) {
-  $::FORM{'buglist'} = join (":", @idlist);
+  $cgi->param('buglist', join (":", @idlist));
   do "move.pl" || die "Error executing move.cgi: $!";
   PutFooter();
   exit;
diff --git a/template/en/default/bug/show.xml.tmpl b/template/en/default/bug/show.xml.tmpl
index 34219c2080..a8227031b7 100644
--- a/template/en/default/bug/show.xml.tmpl
+++ b/template/en/default/bug/show.xml.tmpl
@@ -26,7 +26,7 @@
           urlbase="[% Param('urlbase') %]"
           maintainer="[% Param('maintainer') FILTER xml %]"
 [% IF user %]
-          exporter="[% user.login FILTER xml %]"
+          exporter="[% user.email FILTER xml %]"
 [% END %]
 >
 
-- 
2.47.2