Function: viper-put-string-on-kill-ring

viper-put-string-on-kill-ring is a byte-compiled function defined in viper-cmd.el.gz.

Signature

(viper-put-string-on-kill-ring STRING)

Source Code

;; Defined in /usr/src/emacs/lisp/emulation/viper-cmd.el.gz
;; Make STRING be the first element of the kill ring.
(defun viper-put-string-on-kill-ring (string)
  (setq kill-ring (cons string kill-ring))
  (if (> (length kill-ring) kill-ring-max)
      (setcdr (nthcdr (1- kill-ring-max) kill-ring) nil))
  (setq kill-ring-yank-pointer kill-ring))