From: minima <minima>
Date: Wed, 7 Nov 2001 16:26:41 +0000 (+0000)
Subject: Fix problem with reply disappearing up its own bottom.
X-Git-Tag: R_1_49~16
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?p=spider.git;a=commitdiff_plain;h=ec5995e84ce9c1b25112e1ee8a2bc7d01f033beb

Fix problem with reply disappearing up its own bottom.
---

diff --git a/Changes b/Changes
index 70f3e93a..45c754f3 100644
--- a/Changes
+++ b/Changes
@@ -1,6 +1,7 @@
 07Nov01=======================================================================
 1. fix is_pctext so that it actually catches corrupt spots and announces.
 2. fix console.pl so that you can type in '0' again
+3. Fix problem with reply disappearing up its own bottom.
 06Nov01=======================================================================
 1. fix read so that sysop reading doesn't increment the read counter for 
 private mail not addressed to them.
diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm
index cd3bf74b..598dc7ea 100644
--- a/perl/DXMsg.pm
+++ b/perl/DXMsg.pm
@@ -1092,7 +1092,7 @@ sub do_send_stuff
 				$loc->{reject}++;
 			}
 
-			if (@{$loc->{lines}}) {
+			if ($loc->{lines} && @{$loc->{lines}}) {
 				push @{$loc->{lines}}, length($line) > 0 ? $line : " ";
 			} else {
 				# temporarily store any R: lines so that we end up with