ap4rプロセスが停止しない件について

ap4rプロセスが停止してくれない時があるのですが、原因は多分これですね。
http://redmine.ruby-lang.org/issues/show/3674

以下、ruby-1.8.6-p420向けのパッチ。上記記事(Ruby1.9向け)の再編です。

--- lib/drb/drb-p420.rb	2010-11-01 15:09:36.138190005 +0900
+++ lib/drb/drb.rb	2010-11-01 15:11:08.288190009 +0900
@@ -1416,8 +1416,14 @@
 	grp.add(Thread.current)
 	list = @grp.list
 	while list.size > 0
+          list = list.map do |th|
+            th.kill if th.alive?
+          end.compact
 	  list.each do |th|
-	    th.kill if th.alive?
+            begin
+              th.join
+            rescue Exception
+            end
 	  end
 	  list = @grp.list
 	end