From: Stephen L Johnson <sjohnson@monsters.org>
Date: Sun, 30 Jan 2000 08:03:49 +0000 (+0000)
Subject: change print line in debug() method to print to STDERR instead of STDOUT.
X-Git-Tag: spong-2_7-alpha5~106
X-Git-Url: http://git.etc.gen.nz/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=73c7ff07b5152296b7c37bb2a9e6c42cd6701cb2;p=spong.git

change print line in debug() method to print to STDERR instead of STDOUT.
---

diff --git a/src/lib/Spong/Log.pm b/src/lib/Spong/Log.pm
index 6a157bd..d3ef7e9 100755
--- a/src/lib/Spong/Log.pm
+++ b/src/lib/Spong/Log.pm
@@ -92,7 +92,7 @@ sub error {
 sub debug {
    my ($message,$level) = @_;
    $level = 1 if (! defined $level);  # Default to level 1
-   print scalar localtime, " ", $message, "\n" if $debuglevel >= $level;
+   print STDERR scalar localtime, " ", $message, "\n" if $debuglevel >= $level;
 }
 
 1;  # I'm included perl code, I need this line