Lines Matching +defs:marker +defs:buffer
271 (defun viper-get-visible-buffer-window (wind)
273 (get-buffer-window wind t)
274 (get-buffer-window wind 'visible)))
299 ;; Emacs used to count each multibyte character as several positions in the buffer,
318 ;; Like move-marker but creates a virgin marker if arg isn't already a marker.
320 ;; Arguments: (var-name position &optional buffer).
323 ;; For this, VAR-NAME should be made buffer-local with nil as a default.
324 ;; Then, each time this var is used in `viper-move-marker-locally' in a new
325 ;; buffer, a new marker will be created.
326 (defun viper-move-marker-locally (var pos &optional buffer)
329 (set var (make-marker)))
330 (move-marker (eval var) pos buffer))
418 (set-buffer (get-buffer-create viper-ex-tmp-buf-name))
419 (erase-buffer)
440 (buffer-substring (point) (viper-line-pos 'end)))
443 (viper-get-filenames-from-buffer 'one-per-line))
447 ;; Interpret the stuff in the buffer as a list of file names
448 ;; return a list of file names listed in the buffer beginning at point
451 (defun viper-get-filenames-from-buffer (&optional one-per-line)
466 (buffer-substring (match-beginning 0) (match-end 0))))
476 (set-buffer (get-buffer-create viper-ex-tmp-buf-name))
477 (erase-buffer)
487 (buffer-string)
497 (set-buffer (get-buffer-create viper-ex-tmp-buf-name))
498 (erase-buffer)
501 (setq tmp (viper-get-filenames-from-buffer))
666 (set-buffer buf)
677 (save-buffer))
678 (kill-buffer buf)
690 (set-buffer buf)
691 (let (buffer-read-only)
696 (save-buffer)))
697 (kill-buffer buf)
745 (let ((file (expand-file-name (buffer-file-name buf)))
753 (with-current-buffer buf
764 (setq viper-search-overlay (viper-make-overlay beg end (current-buffer)))
782 (viper-make-overlay (point-min) (point-min) (current-buffer)))
795 (setq viper-replace-overlay (viper-make-overlay beg end (current-buffer)))
869 (1+ (buffer-size)))
872 (viper-make-overlay 1 (1+ (buffer-size)) (current-buffer))
876 (1+ (buffer-size))
877 (current-buffer) nil 'rear-advance)))
883 (string-match "\*Minibuf-" (buffer-name))))
911 ;; checks if object is a marker, has a buffer, and points to within that buffer
912 (defun viper-valid-marker (marker)
913 (if (and (markerp marker) (marker-buffer marker))
914 (let ((buf (marker-buffer marker))
915 (pos (marker-position marker)))
917 (set-buffer buf)
920 (defsubst viper-mark-marker ()
922 (mark-marker t) ; xemacs
923 (mark-marker) ; emacs
929 (setq mark-ring (delete (viper-mark-marker) mark-ring))
1268 (defun viper-setup-master-buffer (&rest other-files-or-buffers)
1269 "Set up the current buffer as a master buffer.
1277 (viper-ring-insert viper-related-files-and-buffers-ring (buffer-name))
1295 ;; must be buffer-local
1340 buffer. If called non-interactively, preferably via the customization widget,
1382 (make-variable-buffer-local 'viper-syntax-preference)