Changeset 3907

Show
Ignore:
Timestamp:
10/13/05 21:49:54 (3 years ago)
Author:
horiguti
Message:

Make it unnecessary to call mw32-ime-initialize.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/lisp/ChangeLog.Meadow

    r3897 r3907  
     12005-10-13  Kyotaro HORIGUCHI  <horiguti@meadowy.org> 
     2 
     3        * international/meadow.el (mw32-ime-toggle): Obsoleted, but left 
     4        for compatibility. 
     5        (mw32-ime-initialize): Ditto. 
     6        (mw32-ime-state-switch): Initialize hooks for control ime if not 
     7        done. 
     8 
    192005-10-06  MIYOSHI Masanori  <miyoshi@meadowy.org> 
    210 
  • trunk/lisp/international/meadow.el

    r3871 r3907  
    413413    (force-mode-line-update t))) 
    414414 
     415;;; mw32-ime-toggle and mw32-ime-initialize are obsolete. 
     416;;; These functions left here for backward compatibility. 
    415417(defun mw32-ime-toggle () 
     418  "This is obsoleted function." 
    416419  (interactive) 
    417420  (if (equal current-input-method "MW32-IME") 
     
    420423 
    421424(defun mw32-ime-initialize () 
     425  "This is obsoleted function. It is unnecessary to call this 
     426function to initialize MW32-IME." 
    422427  (cond 
    423428   ((and (eq system-type 'windows-nt) 
     
    434439      (add-hook 'set-selected-window-buffer-functions 
    435440                'mw32-ime-set-selected-window-buffer-hook) 
    436       (define-key global-map [kanji] 'mw32-ime-toggle) 
    437441      (if coding-system 
    438442          (set-keyboard-coding-system (cdr coding-system))))))) 
     
    448452                      'mw32-ime-select-window-hook) 
    449453         (remove-hook 'set-selected-window-buffer-functions 
    450                       'mw32-ime-set-selected-window-buffer-hook) 
    451          (define-key global-map [kanji] 'ignore)))) 
     454                      'mw32-ime-set-selected-window-buffer-hook)))) 
    452455 
    453456(defun mw32-ime-exit-from-minibuffer () 
     
    459462  (if arg 
    460463      (progn 
     464        (when (null (memq 'mw32-ime-select-window-hook 
     465                          select-window-functions)) 
     466          (add-hook 'select-window-functions 'mw32-ime-select-window-hook) 
     467          (add-hook 'set-selected-window-buffer-functions 
     468                    'mw32-ime-set-selected-window-buffer-hook) 
     469          (mw32-ime-init-mode-line-display)) 
     470 
    461471        (setq inactivate-current-input-method-function 
    462472              'mw32-ime-state-switch)