Function: exit-ethiopic-environment

exit-ethiopic-environment is a byte-compiled function defined in ethio-util.el.gz.

Signature

(exit-ethiopic-environment)

Documentation

Exit Ethiopic language environment.

Source Code

;; Defined in /usr/src/emacs/lisp/language/ethio-util.el.gz
(defun exit-ethiopic-environment ()
  "Exit Ethiopic language environment."
  (while exit-ethiopic-environment-data
    (global-set-key (car (car exit-ethiopic-environment-data))
		    (cdr (car exit-ethiopic-environment-data)))
    (setq exit-ethiopic-environment-data
	  (cdr exit-ethiopic-environment-data)))

  (remove-hook 'find-file-hook 'ethio-find-file)
  (remove-hook 'write-file-functions 'ethio-write-file)
  (remove-hook 'after-save-hook 'ethio-find-file))