Changeset 189

Timestamp:

01/13/06 12:24:07 (18 years ago)

Author:

thauvin

Message:

• allow set log file in config file

File:

• trunk/soft/ObsData/ObsData.pm (modified) (2 diffs, 1 prop)

trunk/soft/ObsData/ObsData.pm

@@ -50 +50 @@
         verbose => defined($options{verbose}) ? $options{verbose} : 1,
         logcallback => $options{logcallback},
-        logfile => $options{logfile} || "obsdata.log",
+        logfile => $options{logfile},
         dry_run => $options{dry_run},
         interactive_callback => $options{interactive_callback},
@@ -60 +60 @@
 
     $obsdata->{config} or return undef;
+
+    $obsdata->{logfile} ||= $obsdata->{config}->val('.', 'logfile') || 'obsdata.log';
 
     bless($obsdata, $class);