diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-08-28 18:07:15 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-08-28 18:07:15 +0000 |
commit | fa921dc629a49b7e24905db4197ca6edea472539 (patch) | |
tree | 810f2de233dc540040965e28a7b472fb4cdac10b /lib/Cwd.pm | |
parent | ac83e8b044590bc6622a16582bca511edfc55703 (diff) | |
download | perl-fa921dc629a49b7e24905db4197ca6edea472539.tar.gz |
Typo in #6858.
p4raw-id: //depot/perl@6862
Diffstat (limited to 'lib/Cwd.pm')
-rw-r--r-- | lib/Cwd.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Cwd.pm b/lib/Cwd.pm index eb337b40e0..2f51689ce2 100644 --- a/lib/Cwd.pm +++ b/lib/Cwd.pm @@ -340,7 +340,7 @@ sub _qnx_cwd { } sub _qnx_abs_path { - my $path = @_ ? shift '.'; + my $path = @_ ? shift : '.'; my $realpath=`/usr/bin/fullpath -t $path`; chop $realpath; return $realpath; |