Function: robin-invert-region

robin-invert-region is an interactive and byte-compiled function defined in robin.el.gz.

Signature

(robin-invert-region BEGIN END &optional NAME)

Documentation

Apply reverse conversion to the region.

NAME, if given, is a string specifying a robin package. If NAME is not given or nil, the value of robin-current-package-name is used.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/international/robin.el.gz
(defun robin-invert-region (begin end &optional name)
  "Apply reverse conversion to the region.
NAME, if given, is a string specifying a robin package.  If NAME
is not given or nil, the value of `robin-current-package-name' is
used."

  (interactive "*r")
  (or name
      (setq name robin-current-package-name)
      (error "No robin package specified"))

  (setq name (intern name))
  (let (str)
    (save-restriction
      (narrow-to-region begin end)
      (goto-char (point-min))
      (while (not (eobp))
	(if (not (setq str (get-char-code-property (following-char) name)))
	    (forward-char 1)
	  (insert str)
	  (delete-char 1))))))