2 files changed, 6 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index 844b1962d..a852ed886 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Sun Aug  3 23:56:50 2003  Nobuyoshi Nakada  <nobu@ruby-lang.org>
+
+	* eval.c (rb_call_super): should propagate previous block for
+	  super call.  [ruby-talk:77884]
+
 Sun Aug  3 19:25:28 2003  Nobuyoshi Nakada  <nobu@ruby-lang.org>
 
 	* eval.c (call_trace_func): clear exception flag temporarily.
diff --git a/eval.c b/eval.c
index 1827aa213..d7b78d9d1 100644
--- a/eval.c
+++ b/eval.c
@@ -5240,7 +5240,7 @@ rb_call_super(argc, argv)
 	klass = k;
     }
 
-    PUSH_ITER(rb_block_given_p()?ITER_PRE:ITER_NOT);
+    PUSH_ITER(ruby_iter->iter || rb_block_given_p() ? ITER_PRE : ITER_NOT);
     result = rb_call(RCLASS(klass)->super, self, ruby_frame->orig_func, argc, argv, 3);
     POP_ITER();