Function: viper-buffer-search-enable

viper-buffer-search-enable is a byte-compiled function defined in viper-cmd.el.gz.

Signature

(viper-buffer-search-enable &optional C)

Source Code

;; Defined in /usr/src/emacs/lisp/emulation/viper-cmd.el.gz
;; Search contents of buffer defined by one of Viper's motion commands.
;; Repeatable via `n' and `N'.
(defun viper-buffer-search-enable (&optional c)
  (cond (c (setq viper-buffer-search-char c))
	((null viper-buffer-search-char)
	 ;; ?g acts as a default value for viper-buffer-search-char
	 (setq viper-buffer-search-char ?g)))
  (define-key viper-vi-basic-map
    (cond ((characterp viper-buffer-search-char)
	   (char-to-string viper-buffer-search-char))
          (t (error "viper-buffer-search-char: Wrong value type, %S"
		    viper-buffer-search-char)))
    #'viper-command-argument)
  (aset viper-exec-array viper-buffer-search-char #'viper-exec-buffer-search)
  (setq viper-prefix-commands
	(cons viper-buffer-search-char viper-prefix-commands)))