diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-04 20:39:36 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-04 20:39:36 +0000 |
| commit | c0961f019733ac906a65ac3bd8f2f21194179c1e (patch) | |
| tree | a097f2392aa5e5a9a971dcc7a46d2125a041198e /lib/Cwd.pm | |
| parent | d0519643027383a891fd684df8a90fa5b75bf419 (diff) | |
| download | perl-c0961f019733ac906a65ac3bd8f2f21194179c1e.tar.gz | |
remove deadcode
p4raw-id: //depot/perl@5526
Diffstat (limited to 'lib/Cwd.pm')
| -rw-r--r-- | lib/Cwd.pm | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/lib/Cwd.pm b/lib/Cwd.pm index 5ddbbbed67..9a92829da5 100644 --- a/lib/Cwd.pm +++ b/lib/Cwd.pm @@ -108,9 +108,6 @@ sub getcwd # This is a faster version of getcwd. It's also more dangerous because # you might chdir out of a directory that you can't chdir back into. -# List of metachars taken from do_exec() in doio.c -my $quoted_shell_meta = quotemeta('$&*(){}[]";\\|?<>~`'."'\n"); - sub fastcwd { my($odev, $oino, $cdev, $cino, $tdev, $tino); my(@path, $path); |