Function: ethio-fidel-to-java-buffer

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

Signature

(ethio-fidel-to-java-buffer)

Documentation

Convert Ethiopic characters in the buffer into the Java escape sequences.

Each escape sequence is of the form \uXXXX, where XXXX is the character's codepoint (in hex) in Unicode.

If ethio-java-save-lowercase is non-nil, use [0-9a-f]. Otherwise, [0-9A-F].

Source Code

;; Defined in /usr/src/emacs/lisp/language/ethio-util.el.gz
;;
;; Java support
;;

;;;###autoload
(defun ethio-fidel-to-java-buffer nil
  "Convert Ethiopic characters in the buffer into the Java escape sequences.

Each escape sequence is of the form \\uXXXX, where XXXX is the
character's codepoint (in hex) in Unicode.

If `ethio-java-save-lowercase' is non-nil, use [0-9a-f].
Otherwise, [0-9A-F]."
  (let ((ucode))

    (goto-char (point-min))
    (while (re-search-forward "[ሀ-፼]" nil t)
      (setq ucode (preceding-char))
      (delete-char -1)
      (insert
       (format (if ethio-java-save-lowercase "\\u%4x" "\\u%4X")
	       ucode)))))