Function: ethio-sera-to-fidel-marker
ethio-sera-to-fidel-marker is an autoloaded, interactive and
byte-compiled function defined in ethio-util.el.gz.
Signature
(ethio-sera-to-fidel-marker &optional FORCE)
Documentation
Convert regions surrounded by "<sera>" and "</sera>" from SERA to FIDEL.
FIDEL is the Amharic alphabet; SERA (System for Ethiopic Representation
in ASCII) is the Latin representation of Ethiopic script.
Assume that each region begins with ethio-primary-language.
The markers "<sera>" and "</sera>" themselves are not deleted.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/language/ethio-util.el.gz
;;;###autoload
(defun ethio-sera-to-fidel-marker (&optional force)
"Convert regions surrounded by \"<sera>\" and \"</sera>\" from SERA to FIDEL.
FIDEL is the Amharic alphabet; SERA (System for Ethiopic Representation
in ASCII) is the Latin representation of Ethiopic script.
Assume that each region begins with `ethio-primary-language'.
The markers \"<sera>\" and \"</sera>\" themselves are not deleted."
(interactive "P")
(if (and buffer-read-only
(not force)
(not (y-or-n-p "Buffer is read-only. Force to convert? ")))
(error ""))
(save-excursion
(goto-char (point-min))
(while (search-forward "<sera>" nil t)
(ethio-sera-to-fidel-region
(point)
(if (search-forward "</sera>" nil t)
(match-beginning 0)
(point-max))
nil
'force))))