emacs minor mode to input english transcription symbols in utf8

dic-mode.el

(define-minor-mode endic-mode
  "Override several keystrokes beginning with Esc-Esc. They are used to insert
the symbols of english transcription."
  nil " Dictionary"
  '(("\e\ec" . (lambda () (interactive) (insert "ɔ")))
    ("\e\eo" . (lambda () (interactive)(insert "ծ")))
    ("\e\es" . (lambda () (interactive)(insert "ʃ")))
    ("\e\et" . (lambda () (interactive)(insert "ɛ")))
    ("\e\ep" . (lambda () (interactive)(insert "ʓ")))
    ("\e\ee" . (lambda () (interactive)(insert "ə")))
    ("\e\ef" . (lambda () (interactive)(insert "θ")))
    ("\e\en" . (lambda () (interactive)(insert "ɳ")))
    ("\e\ei" . (lambda () (interactive)(insert "ɪ")))
    ("\e\ed" . (lambda () (interactive)(insert "ӕ")))
    ("\e\ev" . (lambda () (interactive)(insert "ʌ"))))
  (set-frame-height nil 8)
  (set-frame-width nil 102)
  (run-at-time "2 sec" nil '(lambda ()
			      (modify-frame-parameters nil
						       '((top . -30)
							 (left . 0)))))
  )