Commit b7341ce2 authored by Leigh B. Stoller's avatar Leigh B. Stoller
Browse files

Move the dbdump into a seperate directory since there might be more

then just a dump file.
parent 81c181c0
......@@ -2202,7 +2202,13 @@ sub DumpDB($)
my $archivedir = libArchive::TBUserFileArchiveDirectory($pid, $eid);
# The file is a gzipped.
my $dumpfile = "$archivedir/dbdump.gz";
my $dumpdir = "$archivedir/dbdata";
my $dumpfile = "$dumpdir/dbdump.gz";
if (! -e $dumpdir) {
mkdir($dumpdir, 0775)
or return -1;
}
Template::mysystem("$DBCONTROL dumpexpdb $pid $eid $dumpfile") == 0
or return -1;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment