Function: mouse-drag-tab-line

mouse-drag-tab-line is an interactive and byte-compiled function defined in mouse.el.gz.

Signature

(mouse-drag-tab-line START-EVENT)

Documentation

Drag frame with tab line in its topmost window.

START-EVENT is the starting mouse event of the drag action.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/mouse.el.gz
(defun mouse-drag-tab-line (start-event)
  "Drag frame with tab line in its topmost window.
START-EVENT is the starting mouse event of the drag action."
  (interactive "e")
  (let* ((start (event-start start-event))
	 (window (posn-window start)))
    (if (and (window-live-p window)
             (not (window-at-side-p window 'top)))
        (mouse-drag-line start-event 'tab)
      (let ((frame (window-frame window)))
        (when (frame-parameter frame 'drag-with-tab-line)
          (mouse-drag-frame-move start-event))))))