Changeset 29243

Timestamp:

Sep 27, 2010, 12:34:38 PM (16 years ago)

Author:

rhenders

Message:

Using a default location of ./ if no base dir provided to constructor

File:

• trunk/ippToPsps/perl/ippToPsps/Batch.pm (modified) (1 diff)

trunk/ippToPsps/perl/ippToPsps/Batch.pm

@@ -63 +63 @@
     bless $self, $class;
 
+    if (!defined $self->{_baseDir}) {$self->{_baseDir} = "./";}
     $self->{_parentDir} = $self->{_dvoDb};