From dff7f2f4f3de90a251ba49e9dc5171e40453af43 Mon Sep 17 00:00:00 2001
From: "cyeh%bluemartini.com" <>
Date: Thu, 14 Sep 2000 00:45:48 +0000
Subject: fix for 51520: Missing uses of Param('emailsuffix') patch submitted
 by john.beranek@pace.co.uk (John Beranek)

---
 globals.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'globals.pl')

diff --git a/globals.pl b/globals.pl
index 94e16734d..d8d1bc142 100644
--- a/globals.pl
+++ b/globals.pl
@@ -731,7 +731,7 @@ sub GetLongDescriptionAsText {
     while (MoreSQLData()) {
         my ($who, $when, $text) = (FetchSQLData());
         if ($count) {
-            $result .= "\n\n------- Additional Comments From $who  " .
+            $result .= "\n\n------- Additional Comments From $who".Param('emailsuffix')."  ".
                 time2str("%Y-%m-%d %H:%M", str2time($when)) . " -------\n";
         }
         $result .= $text;
@@ -772,6 +772,7 @@ sub GetLongDescriptionAsHTML {
     SendSQL($query);
     while (MoreSQLData()) {
         my ($who, $email, $when, $text) = (FetchSQLData());
+        $email .= Param('emailsuffix');
         if ($count) {
             $result .= "<BR><BR><I>------- Additional Comments From ";
               if ($who) {
-- 
cgit v1.2.3-24-g4f1b