Commit 3dcf06bf authored by Juri Linkov's avatar Juri Linkov

* lisp/tab-bar.el: Add missing arg.

* lisp/tab-bar.el (tab-bar-list-next-line)
(tab-bar-list-prev-line): Add missing interactive spec for prefix arg.

* lisp/mouse.el (mouse-buffer-menu-mode-groups): Add "Git" regexp
to match "Git-Region-History" mode name for "Version Control" group.
parent e4a62f86
......@@ -1986,7 +1986,7 @@ a large number if you prefer a mixed multitude. The default is 4."
("Text" . "Text")
("Outline" . "Text")
("\\(HT\\|SG\\|X\\|XHT\\)ML" . "SGML")
("log\\|diff\\|vc\\|cvs\\|Annotate" . "Version Control") ; "Change Management"?
("log\\|diff\\|vc\\|cvs\\|Git\\|Annotate" . "Version Control")
("Threads\\|Memory\\|Disassembly\\|Breakpoints\\|Frames\\|Locals\\|Registers\\|Inferior I/O\\|Debugger"
. "GDB")
("Lisp" . "Lisp")))
......
......@@ -1151,13 +1151,13 @@ Letters do not insert themselves; instead, they are commands.
nil))))
(defun tab-bar-list-next-line (&optional arg)
(interactive)
(interactive "p")
(forward-line arg)
(beginning-of-line)
(move-to-column tab-bar-list-column))
(defun tab-bar-list-prev-line (&optional arg)
(interactive)
(interactive "p")
(forward-line (- arg))
(beginning-of-line)
(move-to-column tab-bar-list-column))
......
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