]> git.etc.gen.nz Git - spong.git/commitdiff
Fix appending of $@ to the error message if we fail to send a message to the Spong...
authorAndrew Ruthven <andrew@etc.gen.nz>
Thu, 27 Dec 2007 09:25:12 +0000 (22:25 +1300)
committerAndrew Ruthven <andrew@etc.gen.nz>
Thu, 27 Dec 2007 09:25:12 +0000 (22:25 +1300)
The previous version only appended a newline if $@ was set, not a newline and $@.

src/lib/Spong/Status.pm

index e34dd5eaa3a472a0843913b9e4eae2a2278f1253..8d52904f08776a2f6e33fb94ad831bc3e5be9e5b 100755 (executable)
@@ -114,7 +114,7 @@ sub SendMsg {
       };
 
       # If we got an error message, add it to $errmsg
-      if ($@) { $errmsg .= ($errmsg) ? "\n" : "" . $@; }
+      if ($@) { $errmsg .= ($errmsg ? "\n" : "") . $@; }
 
    }