1 files changed, 4 insertions, 2 deletions
diff --git a/array.h b/array.h
index d489f648f5..1388591342 100644
--- a/array.h
+++ b/array.h
@@ -1,4 +1,4 @@
-/* $Header: array.h,v 3.0 89/10/18 15:08:41 lwall Locked $
+/* $Header: array.h,v 3.0.1.1 89/11/17 15:03:42 lwall Locked $
  *
  *    Copyright (c) 1989, Larry Wall
  *
@@ -6,6 +6,9 @@
  *    as specified in the README file that comes with the perl 3.0 kit.
  *
  * $Log:	array.h,v $
+ * Revision 3.0.1.1  89/11/17  15:03:42  lwall
+ * patch5: nested foreach on same array didn't work
+ * 
  * Revision 3.0  89/10/18  15:08:41  lwall
  * 3.0 baseline
  * 
@@ -17,7 +20,6 @@ struct atbl {
     STR *ary_magic;
     int ary_max;
     int ary_fill;
-    int ary_index;
     char ary_flags;
 };