Commit 848e21b0 authored by Juri Linkov's avatar Juri Linkov

Small fixes. Bind [tab-line mouse-1] to mouse-select-window.

parent 8f268bb9
...@@ -2734,6 +2734,7 @@ is copied instead of being cut." ...@@ -2734,6 +2734,7 @@ is copied instead of being cut."
;; versions. ;; versions.
(global-set-key [header-line down-mouse-1] 'mouse-drag-header-line) (global-set-key [header-line down-mouse-1] 'mouse-drag-header-line)
(global-set-key [header-line mouse-1] 'mouse-select-window) (global-set-key [header-line mouse-1] 'mouse-select-window)
(global-set-key [tab-line mouse-1] 'mouse-select-window)
;; (global-set-key [mode-line drag-mouse-1] 'mouse-select-window) ;; (global-set-key [mode-line drag-mouse-1] 'mouse-select-window)
(global-set-key [mode-line down-mouse-1] 'mouse-drag-mode-line) (global-set-key [mode-line down-mouse-1] 'mouse-drag-mode-line)
(global-set-key [mode-line mouse-1] 'mouse-select-window) (global-set-key [mode-line mouse-1] 'mouse-select-window)
......
...@@ -260,7 +260,8 @@ using the `previous-buffer' command." ...@@ -260,7 +260,8 @@ using the `previous-buffer' command."
(dotimes (_ (1+ (seq-position prev-buffers buffer))) (dotimes (_ (1+ (seq-position prev-buffers buffer)))
(switch-to-prev-buffer window))) (switch-to-prev-buffer window)))
(t (t
(switch-to-buffer buffer))))) (with-selected-window window
(switch-to-buffer buffer))))))
(defun tab-line-switch-to-prev-tab (&optional e) (defun tab-line-switch-to-prev-tab (&optional e)
"Switch to the previous tab." "Switch to the previous tab."
......
...@@ -2957,7 +2957,11 @@ init_iterator (struct it *it, struct window *w, ...@@ -2957,7 +2957,11 @@ init_iterator (struct it *it, struct window *w,
else if (base_face_id == TAB_LINE_FACE_ID) else if (base_face_id == TAB_LINE_FACE_ID)
row = MATRIX_TAB_LINE_ROW (w->desired_matrix); row = MATRIX_TAB_LINE_ROW (w->desired_matrix);
else if (base_face_id == HEADER_LINE_FACE_ID) else if (base_face_id == HEADER_LINE_FACE_ID)
row = MATRIX_HEADER_LINE_ROW (w->desired_matrix); {
/* Header line row depends on whether tab line is enabled. */
w->desired_matrix->tab_line_p = window_wants_tab_line (w);
row = MATRIX_HEADER_LINE_ROW (w->desired_matrix);
}
} }
/* Clear IT, and set it->object and other IT's Lisp objects to Qnil. /* Clear IT, and set it->object and other IT's Lisp objects to Qnil.
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment