Function: viper-valid-marker

viper-valid-marker is a byte-compiled function defined in viper-util.el.gz.

Signature

(viper-valid-marker MARKER)

Source Code

;; Defined in /usr/src/emacs/lisp/emulation/viper-util.el.gz
;; checks if object is a marker, has a buffer, and points to within that buffer
(defun viper-valid-marker (marker)
  (if (and (markerp marker) (marker-buffer marker))
      (let ((buf (marker-buffer marker))
	    (pos (marker-position marker)))
	(with-current-buffer buf
	  (and (<= pos (point-max)) (<= (point-min) pos))))))