Function: ethio-modify-vowel

ethio-modify-vowel is an autoloaded, interactive and byte-compiled function defined in ethio-util.el.gz.

Signature

(ethio-modify-vowel)

Documentation

Modify the vowel of the FIDEL that is under the cursor.

FIDEL is the Amharic/Ethiopic alphabet.

Probably introduced at or before Emacs version 21.1.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/language/ethio-util.el.gz
;;
;; vowel modification
;;

;;;###autoload
(defun ethio-modify-vowel nil
  "Modify the vowel of the FIDEL that is under the cursor.
FIDEL is the Amharic/Ethiopic alphabet."
  (interactive)
  (ethio-adjust-robin)
  (let ((consonant (ethio-get-consonant (following-char)))
	vowel)
    (if (null consonant)
	(error "")			; not an Ethiopic char
      (setq vowel (read-char "Modify vowel to: "))
      (delete-char 1)
      (if (and (string= consonant "'") (= vowel ?W))
	  (insert ?ኧ)
	(save-restriction
	  (narrow-to-region (point) (point))
	  (insert consonant vowel)
	  (robin-convert-region (point-min) (point-max) "ethiopic-sera"))))))