summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog8
-rwxr-xr-xmpc.pl2
-rwxr-xr-xmwc.pl2
3 files changed, 10 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index 44e7a9a3..c7b06a33 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+Fri Aug 22 07:04:17 UTC 2008 Johnny Willemsen <jwillemsen@remedy.nl>
+
+ * mwc.pl:
+ * mpc.pl:
+ Use RealBin to get the location of this script, that gives the
+ real location also in case we use a symbolic link to these
+ scripts.
+
Wed Aug 20 19:19:17 UTC 2008 Johnny Willemsen <jwillemsen@remedy.nl>
* devtools/document_template.pl:
diff --git a/mpc.pl b/mpc.pl
index f2d4827a..8d12b8e1 100755
--- a/mpc.pl
+++ b/mpc.pl
@@ -20,7 +20,7 @@ use FindBin;
use File::Spec;
use File::Basename;
-my $basePath = $FindBin::Bin;
+my $basePath = $FindBin::RealBin;
if ($^O eq 'VMS') {
$basePath = File::Spec->rel2abs(dirname($0)) if ($basePath eq '');
$basePath = VMS::Filespec::unixify($basePath);
diff --git a/mwc.pl b/mwc.pl
index f2d4827a..8d12b8e1 100755
--- a/mwc.pl
+++ b/mwc.pl
@@ -20,7 +20,7 @@ use FindBin;
use File::Spec;
use File::Basename;
-my $basePath = $FindBin::Bin;
+my $basePath = $FindBin::RealBin;
if ($^O eq 'VMS') {
$basePath = File::Spec->rel2abs(dirname($0)) if ($basePath eq '');
$basePath = VMS::Filespec::unixify($basePath);