Function: forms--trans

forms--trans is a byte-compiled function defined in forms.el.gz.

Signature

(forms--trans SUBJ ARG REP)

Documentation

Translate in SUBJ all chars ARG into char REP.

ARG and REP should be single-char strings.

Source Code

;; Defined in /usr/src/emacs/lisp/forms.el.gz
(defun forms--trans (subj arg rep)
  "Translate in SUBJ all chars ARG into char REP.
ARG and REP should be single-char strings."
  (let ((i 0)
	(re (regexp-quote arg))
	(k (string-to-char rep)))
    (while (setq i (string-match re subj i))
      (aset subj i k)
      (setq i (1+ i)))))