Lines Matching +defs:copy +defs:marker
25 ;; You should have received a copy of the GNU General Public License
77 ;; * Cut copy and paste: You can cut, copy and paste rectangular
254 artist package will use its own copy buffer."
469 (defvar artist-copy-buffer nil
569 (define-key map "\C-c\C-a\M-w" 'artist-select-op-copy-rectangle)
749 ("Copy" (("copy rectangle" copy-r "copy-r"
755 artist-t artist-copy-rect)
756 ("copy square" copy-s "copy-s"
762 artist-t artist-copy-square))))))
1329 \\[artist-select-op-copy-rectangle] Selects copying rectangles
1342 artist-interface-with-rect If cut/copy/paste should interface with rect
1788 (setq res (cons (copy-sequence (substring str start match-pos)) res))
1807 (let ((str (copy-sequence (buffer-substring (point-min)
1869 (copy-sequence (buffer-substring (point-min)
3607 (artist-copy-generic x1 y1 x2 y2)
3618 (artist-copy-generic new-x1 new-y1 new-x2 new-y2)
3632 (defun artist-copy-generic (x1 y1 x2 y2)
3634 Output is a copy buffer, a list of strings, representing the
3647 (setq artist-copy-buffer (reverse l)))))
3650 (defun artist-copy-rect (rect x1 y1 x2 y2)
3653 (artist-copy-generic x1 y1 x2 y2))
3655 (defun artist-copy-square (square x1 y1 x2 y2)
3663 (artist-copy-generic new-x1 new-y1 new-x2 new-y2)))
3666 "Pastes the contents of the copy-buffer at X,Y."
3667 (let ((copy-buf (if artist-interface-with-rect
3669 artist-copy-buffer)))
3670 (if (not (null copy-buf))
3671 (while (not (null copy-buf))
3673 (artist-replace-string (car copy-buf))
3674 (setq copy-buf (cdr copy-buf))
3811 (arrow-marker (make-marker)))
3813 (set-marker arrow-marker (point))
3814 (aset arrow-point 0 arrow-marker)
3820 (defsubst artist-arrow-point-get-marker (arrow-point)
3821 "Retrieve the marker component of an ARROW-POINT."
4598 (arrow-marker (artist-arrow-point-get-marker arrow-point))
4604 (goto-char (marker-position arrow-marker))
4620 (arrow-marker (artist-arrow-point-get-marker arrow-point))
4626 (goto-char (marker-position arrow-marker))
4726 (defun artist-select-op-copy-rectangle ()
4729 (artist-select-operation "copy rectangle"))
4731 (defun artist-select-op-copy-square ()