Function: ethio-tex-to-fidel-buffer

ethio-tex-to-fidel-buffer is an autoloaded, interactive and byte-compiled function defined in ethio-util.el.gz.

Signature

(ethio-tex-to-fidel-buffer)

Documentation

Convert fidel-tex commands in the current buffer into FIDEL chars.

FIDEL is the Amharic/Ethiopic alphabet.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/language/ethio-util.el.gz
;;;###autoload
(defun ethio-tex-to-fidel-buffer ()
  "Convert fidel-tex commands in the current buffer into FIDEL chars.
FIDEL is the Amharic/Ethiopic alphabet."
  (interactive)
  (let ((inhibit-read-only t)
	;; (p) (ch)
	)

    ;; TeX macros to Ethiopic characters
    (robin-convert-region (point-min) (point-max) "ethiopic-tex")

    ;; compose geminated characters
    (goto-char (point-min))
    (while (re-search-forward "\\\\geminateG{\\(\\ce?\\)}" nil t)
      (replace-match "\\1፟"))

    ;; remove redundant braces, if any
    (goto-char (point-min))
    (while (re-search-forward "{\\(\\ce\\)}" nil t)
      (replace-match "\\1"))

    (goto-char (point-min))
    (set-buffer-modified-p nil)))