Function: viper-substitute

viper-substitute is an interactive and byte-compiled function defined in viper-cmd.el.gz.

Signature

(viper-substitute ARG)

Documentation

Substitute characters.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/emulation/viper-cmd.el.gz
;; bound to s
(defun viper-substitute (arg)
  "Substitute characters."
  (interactive "P")
  (let ((val (viper-p-val arg))
	;;(com (viper-getcom arg))
	)
    (push-mark nil t)
    (forward-char val)
    (if (eq viper-intermediate-command 'viper-repeat)
	(viper-change-subr (mark t) (point))
      (viper-change (mark t) (point)))
    ;; com is set to ?r when we repeat this command with dot
    (viper-set-destructive-command (list 'viper-substitute val ?r nil nil nil))
    ))