diff options
author | elliott_c <ocielliottc@users.noreply.github.com> | 2003-12-10 13:20:28 +0000 |
---|---|---|
committer | elliott_c <ocielliottc@users.noreply.github.com> | 2003-12-10 13:20:28 +0000 |
commit | da13c0b043785331011046ac1be9305b25cc14c1 (patch) | |
tree | d186ca5695ad205b3360b98f755d87554b94d3dc | |
parent | 37bbd6cdec1e912830c66d31f06f799466925d5d (diff) | |
download | ATCD-da13c0b043785331011046ac1be9305b25cc14c1.tar.gz |
ChangeLogTag: Wed Dec 10 07:18:44 2003 Chad Elliott <elliott_c@ociweb.com>
-rw-r--r-- | ChangeLog | 6 | ||||
-rwxr-xr-x | bin/depgen.pl | 5 |
2 files changed, 9 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog index 1219c99fc95..4097a950865 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +Wed Dec 10 07:18:44 2003 Chad Elliott <elliott_c@ociweb.com> + + * bin/depgen.pl: + + Fixed a bug introduced by my change on Tue Dec 9 13:00:30 2003. + Wed Dec 10 13:17:13 UTC 2003 Johnny Willemsen <jwillemsen@remedy.nl> * examples/IPC_SAP/SSL_SAP/SSL-server-poll.cpp: diff --git a/bin/depgen.pl b/bin/depgen.pl index 25ab3162790..3506ec10162 100755 --- a/bin/depgen.pl +++ b/bin/depgen.pl @@ -14,6 +14,7 @@ eval '(exit $?0)' && eval 'exec perl -w -S $0 ${1+"$@"}' # ************************************************************ use strict; +use Cwd; use File::Basename; my($execPath) = getExecutePath($0); @@ -68,7 +69,7 @@ sub getExecutePath { $loc = dirname($prog); } else { - $loc = Cwd::getcwd() . '/' . dirname($prog); + $loc = getcwd() . '/' . dirname($prog); } } else { @@ -76,7 +77,7 @@ sub getExecutePath { } if ($loc eq '.') { - $loc = Cwd::getcwd(); + $loc = getcwd(); } if ($loc ne '') { |