[inseparable changes from patch from perl5.003_23 to perl5.003_24]

[p5sagit/p5-mst-13.2.git] / opcode.pl

diff --git a/opcode.pl b/opcode.pl
index b231933..d63ecc5 100755 (executable)
--- a/opcode.pl
+++ b/opcode.pl
@@ -224,7 +224,8 @@ bless               bless                   ck_fun          s       S S?
 # Pushy I/O.
 
 backtick       backticks               ck_null         t       
-glob           glob                    ck_glob         t       S S
+# glob defaults its first arg to $_
+glob           glob                    ck_glob         t       S? S?
 readline       <HANDLE>                ck_null         t       
 rcatline       append I/O operator     ck_null         t