Finally, paths sorted out I think.

--HG-- extra : convert_revision : svn%3A39bc706e-5318-0410-9160-8a85361fbb7c/trunk%402495
2008-09-06 08:35:27 +00:00
parent 6b213a9caf
commit f85eeb2adb
1 changed files with 7 additions and 0 deletions
@@ -1,5 +1,12 @@
 #!/usr/bin/perl

+use strict;
+use Cwd;
+use File::Basename;
+
+my ($myself, $path) = fileparse($0);
+chdir($path);
+
 require 'helpers.pm';

 chdir(Build::PathFormat('../builder'));