3 files changed, 7 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index 373d9fecb2..a5a7146f34 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Sun Jun 29 21:39:54 2008  Tanaka Akira  <akr@fsij.org>
+
+	* eval.c (rb_obj_respond_to): use RTEST to test the result of
+	  respond_to? method.
+
 Sun Jun 29 21:20:17 2008  URABE Shyouhei  <shyouhei@ruby-lang.org>
 
 	* array.c (rb_ary_fill): (compatibility) do not raise
diff --git a/eval.c b/eval.c
index 944b819ef9..aac4be2449 100644
--- a/eval.c
+++ b/eval.c
@@ -4233,7 +4233,7 @@ rb_obj_respond_to(obj, id, priv)
 	int n = 0;
 	args[n++] = ID2SYM(id);
 	if (priv) args[n++] = Qtrue;
-	return rb_funcall2(obj, respond_to, n, args);
+	return RTEST(rb_funcall2(obj, respond_to, n, args));
     }
 }
 
diff --git a/version.h b/version.h
index e3ef174e5d..ce4f414d4d 100644
--- a/version.h
+++ b/version.h
@@ -2,7 +2,7 @@
 #define RUBY_RELEASE_DATE "2008-06-29"
 #define RUBY_VERSION_CODE 187
 #define RUBY_RELEASE_CODE 20080629
-#define RUBY_PATCHLEVEL 37
+#define RUBY_PATCHLEVEL 38
 
 #define RUBY_VERSION_MAJOR 1
 #define RUBY_VERSION_MINOR 8