* ext/tk/lib/tk/image.rb: TkPhotoImage#cget bug fix

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

ChangeLog

@@ -1,3 +1,7 @@
+Fri Dec 24 23:27:18 2004  Hidetoshi NAGAI  <nagai@ai.kyutech.ac.jp>
+
+	* ext/tk/lib/tk/image.rb: TkPhotoImage#cget bug fix
+
 Fri Dec 24 03:06:13 2004  Nobuyoshi Nakada  <nobu@ruby-lang.org>
 
 	* io.c (io_reopen, rb_io_reopen): prohibit to change access mode for

ext/tk/lib/tk/image.rb

@@ -89,9 +89,9 @@ class TkPhotoImage<TkImage
   def cget(option)
     case option.to_s
     when 'data', 'file'
-      tk_send 'cget', option
+      tk_send 'cget', '-' << option.to_s
     else
-      tk_tcl2ruby(tk_send('cget', option))
+      tk_tcl2ruby(tk_send('cget', '-' << option.to_s))
     end
   end