From 5c293c10e105a9a9e2a1515e362a937d15a18474 Mon Sep 17 00:00:00 2001
From: seki <seki@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Sat, 19 Feb 2005 10:00:33 +0000
Subject: [PATCH] (DRbObject#respond_to?) take two arguments. [ruby-dev:25722]

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@8002 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ChangeLog           | 7 +++++++
 lib/drb/drb.rb      | 4 ++--
 test/drb/drbtest.rb | 5 +++++
 3 files changed, 14 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index f18ca8e2e7..2a77f5d260 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+Sat Feb 19 18:46:56 2005  Masatoshi SEKI  <m_seki@mva.biglobe.ne.jp>
+
+	* lib/drb/drb.rb (DRbObject#respond_to?): take two arguments.
+	  [ruby-dev:25722]
+
+	* test/drb/drbtest.rb: ditto.
+
 Sat Feb 19 13:52:02 2005  Tanaka Akira  <akr@m17n.org>
 
 	* lib/open-uri.rb: call OpenSSL::SSL::SSLSocket#post_connection_check
diff --git a/lib/drb/drb.rb b/lib/drb/drb.rb
index 58c3f8d2fc..e5aa895b96 100644
--- a/lib/drb/drb.rb
+++ b/lib/drb/drb.rb
@@ -1046,14 +1046,14 @@ module DRb
     undef :to_s
     undef :to_a if respond_to?(:to_a)
 
-    def respond_to?(msg_id)
+    def respond_to?(msg_id, priv=false)
       case msg_id
       when :_dump
         true
       when :marshal_dump
         false
       else
-        method_missing(:respond_to?, msg_id)
+        method_missing(:respond_to?, msg_id, priv)
       end
     end
 
diff --git a/test/drb/drbtest.rb b/test/drb/drbtest.rb
index b7c259085e..432c7a78bb 100644
--- a/test/drb/drbtest.rb
+++ b/test/drb/drbtest.rb
@@ -98,6 +98,11 @@ module DRbCore
     assert_equal(6, @there.sample(onecky, 1, 2))
     ary = @there.to_a
     assert_kind_of(DRb::DRbObject, ary)
+    
+    assert(@there.respond_to?(:to_a, true))
+    assert(@there.respond_to?(:eval, true))
+    assert(! @there.respond_to?(:eval, false))
+    assert(! @there.respond_to?(:eval))
   end
 
   def test_01_02_loop