Merge branch 'tk_utf8' into trunk

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@33271 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 6 insertions, 6 deletions

diff --git a/ext/tk/sample/tcltklib/sample0.rb b/ext/tk/sample/tcltklib/sample0.rb
index cd4c8069b4..0ac303ae9e 100644
--- a/ext/tk/sample/tcltklib/sample0.rb
+++ b/ext/tk/sample/tcltklib/sample0.rb
@@ -1,18 +1,18 @@
 #! /usr/local/bin/ruby -vd
 
-# tcltklib ライブラリのテスト
+# tcltklib �����ゃ����������������鴻��
 
 require "tcltklib"
 
 def test
-  # インタプリタを生成する
+  # ��ゃ�潟�帥�������帥��������������
   ip1 = TclTkIp.new()
 
-  # 評価してみる
+  # 荅�箴＜�������帥��
   print ip1._return_value().inspect, "\n"
   print ip1._eval("puts {abc}").inspect, "\n"
 
-  # ボタンを作ってみる
+  # �����帥�潟��篏���ｃ����帥��
   print ip1._return_value().inspect, "\n"
   print ip1._eval("button .lab -text exit -command \"destroy .\"").inspect,
     "\n"
@@ -20,12 +20,12 @@ def test
   print ip1._eval("pack .lab").inspect, "\n"
   print ip1._return_value().inspect, "\n"
 
-  # インタプリタから ruby コマンドを評価してみる
+  # ��ゃ�潟�帥�������帥����� ruby ��潟����潟�����荅�箴＜�������帥��
 #  print ip1._eval(%q/ruby {print "print by ruby\n"}/).inspect, "\n"
   print ip1._eval(%q+puts [ruby {print "print by ruby\n"; "puts by tcl/tk"}]+).inspect, "\n"
   print ip1._return_value().inspect, "\n"
 
-  # もう一つインタプリタを生成してみる
+  # ������筝���ゃ�ゃ�潟�帥�������帥����������������帥��
   ip2 = TclTkIp.new()
   ip2._eval("button .lab -text test -command \"puts test ; destroy .\"")
   ip2._eval("pack .lab")