summaryrefslogtreecommitdiff
path: root/opcode.pl
diff options
context:
space:
mode:
authorGisle Aas <gisle@activestate.com>2006-02-07 17:32:50 +0000
committerGisle Aas <gisle@activestate.com>2006-02-07 17:32:50 +0000
commitd4ac975eac140a6fda54f99664f15120fd97e7be (patch)
treefde462215af5bd354dbcb674446cfe6d9b55c28b /opcode.pl
parent71302fe379907f97d78296ec5f7430559d3a05ca (diff)
downloadperl-d4ac975eac140a6fda54f99664f15120fd97e7be.tar.gz
Allow bareword file handle as argument to chdir().
This copies the mechanism used by truncate(). Fixes bug #38457. p4raw-id: //depot/perl@27125
Diffstat (limited to 'opcode.pl')
-rwxr-xr-xopcode.pl3
1 files changed, 2 insertions, 1 deletions
diff --git a/opcode.pl b/opcode.pl
index fdf07c17be..61ab824d24 100755
--- a/opcode.pl
+++ b/opcode.pl
@@ -907,7 +907,8 @@ ftbinary -B ck_ftst isu- F-
# File calls.
-chdir chdir ck_fun isT% S?
+# chdir really behaves as if it had both "S?" and "F?"
+chdir chdir ck_chdir isT% S?
chown chown ck_fun imsT@ L
chroot chroot ck_fun isTu% S?
unlink unlink ck_fun imsTu@ L