Author: dylan
Date: 2004-06-06 12:28:17 -0400 (Sun, 06 Jun 2004)
New Revision: 228
Modified:
trunk/dev-tools/cold-backup.pl
Log:
fixed cold-backup.pl
Modified: trunk/dev-tools/cold-backup.pl
===================================================================
--- trunk/dev-tools/cold-backup.pl 2004-06-05 21:38:52 UTC (rev 227)
+++ trunk/dev-tools/cold-backup.pl 2004-06-06 16:28:17 UTC (rev 228)
@@ -96,8 +96,9 @@
### Step 3: Ask subversion to make a dump of a repository.
-system("(svnadmin dump '$repo' > '$backup_file') 2>&1") and exit $?;
+system("(svnadmin dump '$repo_dir' > '$backup_file') 2>&1") and exit $?;
+
### Step 3+1: If --symlink is given, symlink the latest version.
if ($option{symlink}) {
my $current = File::Spec->catfile($backup_dir, "$repo-current");