Gecko [ beriskala.com ]

Name	Size	Permission	Date
after.rb	127 B	-rw-r--r--	2023-07-26 18:01
autoload.rb	22.76 KB	-rw-r--r--	2023-07-26 18:01
bgerror.rb	667 B	-rw-r--r--	2023-07-26 18:01
bindtag.rb	2.67 KB	-rw-r--r--	2023-07-26 18:01
busy.rb	2.22 KB	-rw-r--r--	2023-07-26 18:01
button.rb	769 B	-rw-r--r--	2023-07-26 18:01
canvas.rb	22.82 KB	-rw-r--r--	2023-07-26 18:01
canvastag.rb	9.19 KB	-rw-r--r--	2023-07-26 18:01
checkbutton.rb	1001 B	-rw-r--r--	2023-07-26 18:01
clipboard.rb	1.64 KB	-rw-r--r--	2023-07-26 18:01
clock.rb	1.6 KB	-rw-r--r--	2023-07-26 18:01
composite.rb	11.87 KB	-rw-r--r--	2023-07-26 18:01
console.rb	1.27 KB	-rw-r--r--	2023-07-26 18:01
dialog.rb	8.9 KB	-rw-r--r--	2023-07-26 18:01
encodedstr.rb	4.55 KB	-rw-r--r--	2023-07-26 18:01
entry.rb	2.58 KB	-rw-r--r--	2023-07-26 18:01
event.rb	17.5 KB	-rw-r--r--	2023-07-26 18:01
font.rb	60.32 KB	-rw-r--r--	2023-07-26 18:01
fontchooser.rb	3.59 KB	-rw-r--r--	2023-07-26 18:01
frame.rb	3.45 KB	-rw-r--r--	2023-07-26 18:01
grid.rb	7.69 KB	-rw-r--r--	2023-07-26 18:01
image.rb	12.54 KB	-rw-r--r--	2023-07-26 18:01
itemconfig.rb	55.14 KB	-rw-r--r--	2023-07-26 18:01
itemfont.rb	9.29 KB	-rw-r--r--	2023-07-26 18:01
kinput.rb	1.56 KB	-rw-r--r--	2023-07-26 18:01
label.rb	609 B	-rw-r--r--	2023-07-26 18:01
labelframe.rb	1014 B	-rw-r--r--	2023-07-26 18:01
listbox.rb	7.82 KB	-rw-r--r--	2023-07-26 18:01
macpkg.rb	1.91 KB	-rw-r--r--	2023-07-26 18:01
menu.rb	20.04 KB	-rw-r--r--	2023-07-26 18:01
menubar.rb	4.08 KB	-rw-r--r--	2023-07-26 18:01
menuspec.rb	13.75 KB	-rw-r--r--	2023-07-26 18:01
message.rb	693 B	-rw-r--r--	2023-07-26 18:01
mngfocus.rb	672 B	-rw-r--r--	2023-07-26 18:01
msgcat.rb	8.46 KB	-rw-r--r--	2023-07-26 18:01
namespace.rb	14.34 KB	-rw-r--r--	2023-07-26 18:01
optiondb.rb	11.28 KB	-rw-r--r--	2023-07-26 18:01
optionobj.rb	4.87 KB	-rw-r--r--	2023-07-26 18:01
pack.rb	2.51 KB	-rw-r--r--	2023-07-26 18:01
package.rb	2.8 KB	-rw-r--r--	2023-07-26 18:01
palette.rb	1.13 KB	-rw-r--r--	2023-07-26 18:01
panedwindow.rb	7.76 KB	-rw-r--r--	2023-07-26 18:01
place.rb	3.86 KB	-rw-r--r--	2023-07-26 18:01
radiobutton.rb	1.98 KB	-rw-r--r--	2023-07-26 18:01
root.rb	2.04 KB	-rw-r--r--	2023-07-26 18:01
scale.rb	2.76 KB	-rw-r--r--	2023-07-26 18:01
scrollable.rb	1.74 KB	-rw-r--r--	2023-07-26 18:01
scrollbar.rb	4.66 KB	-rw-r--r--	2023-07-26 18:01
scrollbox.rb	1.13 KB	-rw-r--r--	2023-07-26 18:01
selection.rb	2.19 KB	-rw-r--r--	2023-07-26 18:01
spinbox.rb	3.04 KB	-rw-r--r--	2023-07-26 18:01
tagfont.rb	859 B	-rw-r--r--	2023-07-26 18:01
text.rb	45.64 KB	-rw-r--r--	2023-07-26 18:01
textimage.rb	2.22 KB	-rw-r--r--	2023-07-26 18:01
textmark.rb	4.91 KB	-rw-r--r--	2023-07-26 18:01
texttag.rb	7.76 KB	-rw-r--r--	2023-07-26 18:01
textwindow.rb	4.26 KB	-rw-r--r--	2023-07-26 18:01
timer.rb	14.46 KB	-rw-r--r--	2023-07-26 18:01
tk_mac.rb	3.68 KB	-rw-r--r--	2023-07-26 18:01
toplevel.rb	6.98 KB	-rw-r--r--	2023-07-26 18:01
ttk_selector.rb	2.98 KB	-rw-r--r--	2023-07-26 18:01
txtwin_abst.rb	785 B	-rw-r--r--	2023-07-26 18:01
validation.rb	9.61 KB	-rw-r--r--	2023-07-26 18:01
variable.rb	45.88 KB	-rw-r--r--	2023-07-26 18:01
virtevent.rb	3.51 KB	-rw-r--r--	2023-07-26 18:01
winfo.rb	8.36 KB	-rw-r--r--	2023-07-26 18:01
winpkg.rb	3.87 KB	-rw-r--r--	2023-07-26 18:01
wm.rb	14.83 KB	-rw-r--r--	2023-07-26 18:01
xim.rb	2.74 KB	-rw-r--r--	2023-07-26 18:01

Rename

#
# tk/xim.rb : control imput_method
#
require 'tk'

module TkXIM
  include Tk
  extend Tk

TkCommandNames = ['imconfigure'.freeze].freeze

def TkXIM.useinputmethods(value = None, win = nil)
    if value == None
      if win
        bool(tk_call_without_enc('tk', 'useinputmethods',
                                 '-displayof', win))
      else
        bool(tk_call_without_enc('tk', 'useinputmethods'))
      end
    else
      if win
        bool(tk_call_without_enc('tk', 'useinputmethods',
                                 '-displayof', win, value))
      else
        bool(tk_call_without_enc('tk', 'useinputmethods', value))
      end
    end
  end

def TkXIM.useinputmethods_displayof(win, value = None)
    TkXIM.useinputmethods(value, win)
  end

def TkXIM.caret(win, keys=nil)
    if keys
      tk_call_without_enc('tk', 'caret', win, *hash_kv(keys))
      self
    else
      lst = tk_split_list(tk_call_without_enc('tk', 'caret', win))
      info = {}
      while key = lst.shift
        info[key[1..-1]] = lst.shift
      end
      info
    end
  end

def TkXIM.configure(win, slot, value=None)
    begin
      if /^8\.*/ === Tk::TK_VERSION  && JAPANIZED_TK
        if slot.kind_of? Hash
          tk_call('imconfigure', win, *hash_kv(slot))
        else
          tk_call('imconfigure', win, "-#{slot}", value)
        end
      end
    rescue
    end
  end

def TkXIM.configinfo(win, slot=nil)
    if TkComm::GET_CONFIGINFOwoRES_AS_ARRAY
      begin
        if /^8\.*/ === Tk::TK_VERSION  && JAPANIZED_TK
          if slot
            conf = tk_split_list(tk_call('imconfigure', win, "-#{slot}"))
            conf[0] = conf[0][1..-1]
            conf
          else
            tk_split_list(tk_call('imconfigure', win)).collect{|conf|
              conf[0] = conf[0][1..-1]
              conf
            }
          end
        else
          []
        end
      rescue
        []
      end
    else # ! TkComm::GET_CONFIGINFOwoRES_AS_ARRAY
      TkXIM.current_configinfo(win, slot)
    end
  end

def TkXIM.current_configinfo(win, slot=nil)
    begin
      if /^8\.*/ === Tk::TK_VERSION  && JAPANIZED_TK
        if slot
          conf = tk_split_list(tk_call('imconfigure', win, "-#{slot}"))
          { conf[0][1..-1] => conf[1] }
        else
          ret = {}
          tk_split_list(tk_call('imconfigure', win)).each{|conf|
            ret[conf[0][1..-1]] = conf[1]
          }
          ret
        end
      else
        {}
      end
    rescue
      {}
    end
  end

def useinputmethods(value=None)
    TkXIM.useinputmethods(value, self)
  end

def caret(keys=nil)
    TkXIM.caret(self, keys=nil)
  end

def imconfigure(slot, value=None)
    TkXIM.configure(self, slot, value)
  end

def imconfiginfo(slot=nil)
    TkXIM.configinfo(self, slot)
  end
end