Function: hangul2-input-method-internal

hangul2-input-method-internal is a byte-compiled function defined in hangul.el.gz.

Signature

(hangul2-input-method-internal KEY)

Source Code

;; Defined in /usr/src/emacs/lisp/leim/quail/hangul.el.gz
;; Support function for `hangul2-input-method'.  Actually, this
;; function handles the Hangul 2-Bulsik.  KEY is an entered key code
;; used for looking up `hangul2-keymap'."
(defun hangul2-input-method-internal (key)
  (let ((char (+ (aref hangul2-keymap (1- (% key 32)))
                 (cond ((or (= key ?O) (= key ?P)) 2)
                       ((or (= key ?E) (= key ?Q) (= key ?R)
                            (= key ?T) (= key ?W)) 1)
                       (t 0)))))
    (if (< char 31)
        (hangul2-input-method-jaum char)
      (hangul2-input-method-moum char))))