From 96eed9f1b5eccaaa295c3ec8b3e0a3e7459d9c34 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Wed, 19 Jun 2002 00:20:17 +0000
Subject: [PATCH] Changed replies so that "Re:" is not repeated.

---
 lib/WebGUI/Discussion.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/WebGUI/Discussion.pm b/lib/WebGUI/Discussion.pm
index a41cf9a3c..1340bf835 100644
--- a/lib/WebGUI/Discussion.pm
+++ b/lib/WebGUI/Discussion.pm
@@ -139,7 +139,7 @@ sub post {
 		$footer = formatHeader($message{subject},$message{userId},$message{username},$message{dateOfPost},$message{views})
 			.'<p>'.formatMessage($message{message});
 		$message{message} = "";
-		$message{subject} = formatSubject("Re: ".$message{subject});
+		$message{subject} = formatSubject("Re: ".$message{subject}) unless ($message{subject} =~ /^Re:/);
 		$session{form}{mid} = "new";
 		$f->hidden("replyTo",$session{form}{replyTo});
         	if ($session{user}{userId} == 1) {