mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 12:21:25 -08:00
Code Issues Projects Releases Wiki Activity

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

Browse source 
* 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.
This commit is contained in:
Juri Linkov 2019-11-17 00:19:42 +02:00
parent e4a62f8662
commit 3dcf06bfa0
2 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/mouse.el
View file

@ -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")))

4
lisp/tab-bar.el
View file

@ -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))