Changeset 4928 for trunk/Nebulous/lib

Timestamp:

Aug 30, 2005, 5:33:24 PM (21 years ago)

Author:

jhoblitt

Message:

initialize logging from import()

File:

• trunk/Nebulous/lib/Nebulous/Client.pm (modified) (4 diffs)

trunk/Nebulous/lib/Nebulous/Client.pm

@@ -1 +1 @@
 # Copyright (c) 2004  Joshua Hoblitt
 #
-# $Id: Client.pm,v 1.19 2005-08-31 03:25:31 jhoblitt Exp $
+# $Id: Client.pm,v 1.20 2005-08-31 03:33:24 jhoblitt Exp $
 
 package Nebulous::Client;
@@ -23 +23 @@
 use constant LOCK_DEFAULT   => 10;    # default to a 10s lock timeout
 
-Nebulous::Client::Log->init;
-my $log = get_logger( "Nebulous::Client" );
-$log->level( $WARN );
-
 $SOAP::Constants::PATCH_HTTP_KEEPALIVE = 1;
+my $log;
 
 # TODO remove most of the logdies
@@ -39 +36 @@
                 type        => SCALAR,
                 optional    => 1,
+                default     => 'warn',
                 callbacks   => {
                     'is valid level' => sub {
@@ -48 +46 @@
     );
 
+    Nebulous::Client::Log->init;
+    $log = get_logger( "Nebulous::Client" );
     $log->level( $LEVELS{ lc $args{ 'trace' } } );
 
     # this has to be after the log level is set
-    $log->debug( "entered - args: @_" );
+    $log->debug( "args: @_" );
 
     return 1;