Bei pg_dump das tar-Format benutzen, weil pg_restore nur damit zurechtkommt.

[kivitendo-erp.git] / bin / mozilla / admin.pl

diff --git a/bin/mozilla/admin.pl b/bin/mozilla/admin.pl
index 6e9f2020e9283fdaf11be59dd1dd22b6b68c832c..9805417cdfe6e7e87f891e7c6a4c17eb0f274371 100644 (file)
--- a/bin/mozilla/admin.pl
+++ b/bin/mozilla/admin.pl
@@ -757,12 +757,12 @@ sub backup_dataset_start {
 
   $ENV{HOME} = $tmpdir;
 
 
   $ENV{HOME} = $tmpdir;
 

-  my @args = ("-c", "-o", "-h", $form->{dbhost}, "-U", $form->{dbuser});
+  my @args = ("-Ft", "-c", "-o", "-h", $form->{dbhost}, "-U", $form->{dbuser});

   push @args, ("-p", $form->{dbport}) if ($form->{dbport});
   push @args, $form->{dbname};
 
   my $cmd  = "${pg_dump_exe} " . join(" ", map { s/\\/\\\\/g; s/\"/\\\"/g; $_ } @args);
   push @args, ("-p", $form->{dbport}) if ($form->{dbport});
   push @args, $form->{dbname};
 
   my $cmd  = "${pg_dump_exe} " . join(" ", map { s/\\/\\\\/g; s/\"/\\\"/g; $_ } @args);

-  my $name = "dataset_backup_$form->{dbname}_" . strftime("%Y%m%d", localtime()) . ".sql.gz";
+  my $name = "dataset_backup_$form->{dbname}_" . strftime("%Y%m%d", localtime()) . ".tar";

 
   if ($form->{destination} ne "email") {
     my $in = IO::File->new("$cmd |");
 
   if ($form->{destination} ne "email") {
     my $in = IO::File->new("$cmd |");


@@ -774,7 +774,7 @@ sub backup_dataset_start {
       $form->error($locale->text('The pg_dump process could not be started.'));
     }
 
       $form->error($locale->text('The pg_dump process could not be started.'));
     }
 

-    print "content-type: application/octet-stream\n";
+    print "content-type: application/x-tar\n";

     print "content-disposition: attachment; filename=\"${name}\"\n\n";
 
     while (my $line = <$in>) {
     print "content-disposition: attachment; filename=\"${name}\"\n\n";
 
     while (my $line = <$in>) {