diff options
author | linuxpoet <linuxpoet@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-04-07 04:00:30 +0000 |
---|---|---|
committer | linuxpoet <linuxpoet@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-04-07 04:00:30 +0000 |
commit | 0d97f63d229f42b44f7593f228aea2463365b5d2 (patch) | |
tree | 791202524cfac987ba7763a77dc3f8d86e120617 | |
parent | 72c87010a785563bb839ade80cbdaa9d37c85c94 (diff) |
removed further depcreation from tmpfile and gz
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@1038 4979c152-3d1c-0410-bac9-87ea11338e46
-rwxr-xr-x | LedgerSMB/AM.pm | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/LedgerSMB/AM.pm b/LedgerSMB/AM.pm index cb7d4ee7..694275a3 100755 --- a/LedgerSMB/AM.pm +++ b/LedgerSMB/AM.pm @@ -1605,7 +1605,6 @@ sub backup { 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 @@ sub backup { 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 = ""; |