From: NAGAI Hidetoshi <nagai@...>
Date: 1998-07-21T23:27:11+09:00
Subject: [ruby-dev:3362] Re: tk.rb patch (for ruby-1.1c0)

永井＠知能．九工大です．

>>>>> "N" == NAGAI Hidetoshi <nagai@dumbo.ai.kyutech.ac.jp> writes:
N> 「では」というわけで，取り込まれることを前提に
N> Ruby/Tk 版 widget-demo を Ruby_Tk-widget-demo-1.0.tar.gz の名前で
N> ftp://ftp.netlab.co.jp/pub/lang/ruby/in.coming に
N> 置かせていただきました．
N> テストしていただけると助かります．

すみません．
修正し忘れがありましたので，新しいものを
Ruby_Tk-widget-demo-1.0.new.tar.gz として置きました．
新しい方を正式の Ruby_Tk-widget-demo-1.0 としますので，
宜しくお願い致します．

これと関連して，tk.rb のパッチです．

＃ 結局のところ，Ruby/Tk 間での send 対応のための修正です．

--- tk.rb.new3	Tue Jul 21 17:23:55 1998
+++ tk.rb	Tue Jul 21 23:03:41 1998
@@ -453,9 +453,9 @@
   end
 
   def rb_appsend(interp, async, *args)
-    args.unshift('ruby {')
-    args.push('}')
-    appsend(interp, async, *args)
+    args = args.filter{|c| _get_eval_string(c).gsub(/[][$"]/, '\\\\\&')}
+    args.push(').to_s"')
+    appsend(interp, async, 'ruby "(', *args)
   end
 
   def appsend_displayof(interp, win, async, *args)
@@ -468,9 +468,9 @@
   end
 
   def rb_appsend_displayof(interp, win, async, *args)
-    args.unshift('ruby {')
-    args.push('}')
-    appsend_displayof(interp, win, async, *args)
+    args = args.filter{|c| _get_eval_string(c).gsub(/[][$"]/, '\\\\\&')}
+    args.push(').to_s"')
+    appsend_displayof(interp, win, async, 'ruby "(', *args)
   end
 
   def info(*args)

-- 
                                         永井 秀利 （九工大 知能情報）
                                             nagai@ai.kyutech.ac.jp