SF.net SVN: ledger-smb: [1038] branches/1.2/LedgerSMB/AM.pm

[..hidden..]

Revision: 1038
          http://svn.sourceforge.net/ledger-smb/?rev=1038&view=rev
Author:   linuxpoet
Date:     2007-04-06 21:00:30 -0700 (Fri, 06 Apr 2007)

Log Message:
-----------
removed further depcreation from tmpfile and gz

Modified Paths:
--------------
    branches/1.2/LedgerSMB/AM.pm

Modified: branches/1.2/LedgerSMB/AM.pm
===================================================================
--- branches/1.2/LedgerSMB/AM.pm	2007-04-07 03:54:50 UTC (rev 1037)
+++ branches/1.2/LedgerSMB/AM.pm	2007-04-07 04:00:30 UTC (rev 1038)
@@ -1605,7 +1605,6 @@
 
 	my $boundary = time;
 	my $tmpfile = "${LedgerSMB::Sysconfig::backuppath}/$boundary.$globalDBname-$form->{dbversion}-$t[5]$t[4]$t[3].sql";
-	$tmpfile .= ".gz" if ${LedgerSMB::Sysconfig::gzip};
 	$form->{OUT} = "$tmpfile";
 
 	open(OUT, '>', "$form->{OUT}") or $form->error("$form->{OUT} : $!");
@@ -1614,11 +1613,6 @@
 
 	my $today = scalar localtime;
 
-	$myconfig->{dbhost} = 'localhost' unless $myconfig->{dbhost};
-
-	$ENV{PGPASSWD} = $myconfig->{dbpasswd};
-	# drop tables and sequences
-
 	# compress backup if gzip defined
 	my $suffix = "";
 


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