.emacs-my
changeset 1553 760837fd2f5e
parent 1552 da98a7d4c704
child 1554 42a48016fc5a
equal deleted inserted replaced
1552:da98a7d4c704 1553:760837fd2f5e
   957        ((eq arg 4)
   957        ((eq arg 4)
   958         (activate-input-method 'greek))
   958         (activate-input-method 'greek))
   959        ((eq arg 5)
   959        ((eq arg 5)
   960         (activate-input-method 'ipa-x-sampa))
   960         (activate-input-method 'ipa-x-sampa))
   961        ((eq arg 6)
   961        ((eq arg 6)
   962         (activate-input-method 'TeX)) )
   962         (activate-input-method 'TeX))
       
   963        ((eq arg 7)
       
   964         (activate-input-method 'rfc1345)) )
   963     (toggle-input-method arg)) )
   965     (toggle-input-method arg)) )
   964 
   966 
   965 (global-set-key (kbd "C-\\") 'my-toggle-input-method)
   967 (global-set-key (kbd "C-\\") 'my-toggle-input-method)
   966 
   968 
   967 ;; I found this more quick method to allow `forward-word' across pronunciation
   969 ;; I found this more quick method to allow `forward-word' across pronunciation