From f5c74a6e5cae38214d2b9e368855186826a6348f Mon Sep 17 00:00:00 2001
From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sat, 11 Aug 2001 14:58:07 +0000
Subject: [PATCH] Get rid of indread, from Abhijit Menon-Sen.

p4raw-id: //depot/perl@11633
---
 pp_sys.c | 9 ---------
 1 file changed, 9 deletions(-)

diff --git a/pp_sys.c b/pp_sys.c
index 2c6ad8e..b1bdde4 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -389,15 +389,6 @@ PP(pp_glob)
     return result;
 }
 
-#if 0		/* XXX never used! */
-PP(pp_indread)
-{
-    STRLEN n_a;
-    PL_last_in_gv = gv_fetchpv(SvPVx(GvSV((GV*)(*PL_stack_sp--)), n_a), TRUE,SVt_PVIO);
-    return do_readline();
-}
-#endif
-
 PP(pp_rcatline)
 {
     PL_last_in_gv = cGVOP_gv;
-- 
2.7.4