SF.net SVN: ledger-smb:[3446] trunk/LedgerSMB/Database.pm

[..hidden..]

Revision: 3446
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=3446&view=rev
Author:   einhverfr
Date:     2011-07-05 13:17:59 +0000 (Tue, 05 Jul 2011)

Log Message:
-----------
Cleaning up Database.pm warnings

Modified Paths:
--------------
    trunk/LedgerSMB/Database.pm

Modified: trunk/LedgerSMB/Database.pm
===================================================================
--- trunk/LedgerSMB/Database.pm	2011-07-05 13:01:30 UTC (rev 3445)
+++ trunk/LedgerSMB/Database.pm	2011-07-05 13:17:59 UTC (rev 3446)
@@ -29,7 +29,7 @@
 use base('LedgerSMB');
 use strict;
 
-my $temp = $LedgerSMB::Sysconfig::temp_dir;
+my $temp = $LedgerSMB::Sysconfig::tempdir;
 
 =item LedgerSMB::Database->new({dbname = $dbname, countrycode = $cc, chart_name = $name, company_name = $company, username = $username, password = $password})
 
@@ -57,6 +57,8 @@
     }
     if ($self->{source_dir}){
         $self->{source_dir} =~ s/\/*$/\//;
+    } else {
+        $self->{source_dir} = '';
     }
     bless $self, $class;
     return $self;


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.