From: Andrew Ruthven <andrew@etc.gen.nz>
Date: Thu, 27 Dec 2007 09:25:12 +0000 (+1300)
Subject: Fix appending of $@ to the error message if we fail to send a message to the Spong... 
X-Git-Url: http://git.etc.gen.nz/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=e9934710e8e11f373ff4414fde5e56b339311d3a;p=spong.git

Fix appending of $@ to the error message if we fail to send a message to the Spong server.

The previous version only appended a newline if $@ was set, not a newline and $@.
---

diff --git a/src/lib/Spong/Status.pm b/src/lib/Spong/Status.pm
index e34dd5e..8d52904 100755
--- a/src/lib/Spong/Status.pm
+++ b/src/lib/Spong/Status.pm
@@ -114,7 +114,7 @@ sub SendMsg {
       };
 
       # If we got an error message, add it to $errmsg
-      if ($@) { $errmsg .= ($errmsg) ? "\n" : "" . $@; }
+      if ($@) { $errmsg .= ($errmsg ? "\n" : "") . $@; }
 
    }