sydney/Autobot
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Make sure $out is defined.

Browse Source
This commit is contained in:
Elijah Perrault committed 2011-01-17 16:42:22 -07:00
1 parent a1757d685f
commit 64dabaa872
1 file changed
+4
Download Patch File Download Diff File Expand all files Collapse all files
src/API/Log.pm
+4
View File
@@ -20,6 +20,10 @@ sub println
{ {
my ($out) = @_; my ($out) = @_;
if (!defined $out) {
return;
}
my ($nl); my ($nl);
if ($^O =~ /dos/i or $^O =~ /win/i or $^O =~ /netware/i) { if ($^O =~ /dos/i or $^O =~ /win/i or $^O =~ /netware/i) {
$nl = "\r\n"; $nl = "\r\n";