* ext/tk/tkutil.c (get_eval_string_core): bug fix. [ruby-dev:23466]

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

ChangeLog

@@ -1,3 +1,7 @@
+Thu May  6 22:09:29 2004  Hidetoshi NAGAI  <nagai@ai.kyutech.ac.jp>
+
+	* ext/tk/tkutil.c (get_eval_string_core): bug fix. [ruby-dev:23466]
+
 Thu May  6 14:22:29 2004  why the lucky stiff  <why@ruby-lang.org>
 
 	* lib/yaml/rubytypes.rb (to_yaml): added instance variable handling

ext/tk/tkutil.c

@@ -595,7 +595,7 @@ get_eval_string_core(obj, enc_flag, self)
 	    if (rb_respond_to(self, ID_install_cmd)) {
 		return rb_funcall(self, ID_install_cmd, 1, obj);
 	    } else {
-		return tk_install_cmd(obj);
+		return tk_install_cmd_core(obj);
 	    }
 	}