diff options
Diffstat (limited to 'ext/tk/tcltklib.c')
-rw-r--r-- | ext/tk/tcltklib.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/ext/tk/tcltklib.c b/ext/tk/tcltklib.c index 01479301d8..2906cb7281 100644 --- a/ext/tk/tcltklib.c +++ b/ext/tk/tcltklib.c @@ -1263,11 +1263,17 @@ setup_rubytkkit(void) #ifdef __WIN32__ /* rbtk_win32_SetHINSTANCE("tcltklib.so"); */ { +# ifdef HAVE_RUBY_ENC_FIND_BASENAME + const char *base = ruby_enc_find_basename(rb_sourcefile(), NULL, NULL, + rb_filesystem_encoding()); + rbtk_win32_SetHINSTANCE(base); +# else VALUE basename; basename = rb_funcall(rb_cFile, rb_intern("basename"), 1, rb_str_new2(rb_sourcefile())); rbtk_win32_SetHINSTANCE(RSTRING_PTR(basename)); RB_GC_GUARD(basename); +# endif } #endif set_rubytk_kitpath(rb_sourcefile()); |