Function: mouse-drag-secondary-moving
mouse-drag-secondary-moving is an interactive and byte-compiled
function defined in mouse-copy.el.gz.
Signature
(mouse-drag-secondary-moving START-EVENT)
Documentation
Sweep out a secondary selection, then move it to the current point.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/mouse-copy.el.gz
(defun mouse-drag-secondary-moving (start-event)
"Sweep out a secondary selection, then move it to the current point."
(interactive "e")
;; HACK: We assume that mouse-drag-secondary returns nil if
;; there's no secondary selection. This works as of emacs-19.22.
;; It's not clear that there's any other way to get this information.
(if (mouse-drag-secondary start-event)
(progn
(mouse-kill-preserving-secondary)
(insert (gui-get-selection 'SECONDARY)))))