From 13bcc041cac054ee50a14961b1addebbea96f027 Mon Sep 17 00:00:00 2001 From: Gustavo De Nardin Date: Wed, 20 Feb 2008 22:06:30 +0000 Subject: make -v 0 work instead of being equal to -v 9999 --- lib/Iurt/Util.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib/Iurt') diff --git a/lib/Iurt/Util.pm b/lib/Iurt/Util.pm index a101f76..68f3fba 100644 --- a/lib/Iurt/Util.pm +++ b/lib/Iurt/Util.pm @@ -68,10 +68,10 @@ my %plog_level = ( sub plog_init { $plog_name = shift; $plog_file = shift; - $plog_level = shift @_ || 9999; + $plog_level = shift @_; $plog_color = shift @_ || 0; - $plog_level = 9999 if $ENV{PLOG_DEBUG}; + $plog_level = 9999 if ($ENV{PLOG_DEBUG} || ! ($plog_level >= 0)); $plog_color = 0 unless -t fileno $plog_file; -- cgit v1.2.1