1 files changed, 1 insertions, 1 deletions
diff --git a/opcode.pl b/opcode.pl
index 2f4a7fda36..8defa67ea0 100755
--- a/opcode.pl
+++ b/opcode.pl
@@ -444,7 +444,7 @@ bless		bless			ck_fun		s@	S S?
 backtick	quoted execution (``, qx)	ck_open		t%	
 # glob defaults its first arg to $_
 glob		glob			ck_glob		t@	S?
-readline	<HANDLE>		ck_null		t%	
+readline	<HANDLE>		ck_fun		t%	F
 rcatline	append I/O operator	ck_null		t%	
 
 # Bindable operators.