diff --git a/ChangeLog b/ChangeLog
index e0b3b231f1..03789a0914 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Mon Jun 26 23:42:57 2006  Nobuyoshi Nakada  <nobu@ruby-lang.org>
+
+	* eval.c (call_trace_func): no check for argument number of the
+	  callback.  fixed: [ruby-dev:28812]
+
 Mon Jun 26 18:37:44 2006  Hidetoshi NAGAI  <nagai@ai.kyutech.ac.jp>
 
 	* ext/tk/tcltklib.c (ip_delete): fix SEGV when a slave-ip is
diff --git a/eval.c b/eval.c
index d9afc3436f..ec1beb3acd 100644
--- a/eval.c
+++ b/eval.c
@@ -2592,7 +2592,7 @@ call_trace_func(rb_event_t event, NODE *node, VALUE self, ID id, VALUE klass /*
 					    id?ID2SYM(id):Qnil,
 					    self ? rb_f_binding(self) : Qnil,
 					    klass?klass:Qnil),
-		    Qundef, 0, 1);
+		    Qundef, 0, 0);
     }
     if (raised) thread_set_raised();
     POP_TAG();