[Box Backup-commit] COMMIT r2242 - box/trunk/infrastructure
boxbackup-dev@fluffy.co.uk
boxbackup-dev@fluffy.co.uk
Thu, 21 Aug 2008 11:11:27 +0100 (BST)
Author: chris
Date: 2008-08-21 11:11:27 +0100 (Thu, 21 Aug 2008)
New Revision: 2242
Modified:
box/trunk/infrastructure/BoxPlatform.pm.in
Log:
Understand Boxi SVN URLs and build an appropriate version string for Box
Backup from them.
Modified: box/trunk/infrastructure/BoxPlatform.pm.in
===================================================================
--- box/trunk/infrastructure/BoxPlatform.pm.in 2008-08-21 10:10:56 UTC (rev 2241)
+++ box/trunk/infrastructure/BoxPlatform.pm.in 2008-08-21 10:11:27 UTC (rev 2242)
@@ -68,8 +68,17 @@
}
}
close INFO;
- $svnurl =~ m!box/(.+)$!;
- my $svndir = $1;
+
+ my $svndir;
+ if ($svnurl =~ m!/box/(.+)$!)
+ {
+ $svndir = $1;
+ }
+ elsif ($svnurl =~ m'/(boxi/.+)/boxi/boxbackup')
+ {
+ $svndir = $1;
+ }
+
$svndir =~ tr/0-9A-Za-z/_/c;
$product_version =~ s/USE_SVN_VERSION/$svndir.'_'.$svnversion/e;
}