gwh/slackbuilds
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Added a branching menu.

Browse source
This commit is contained in:
Phil Jackson 2010-09-01 22:13:08 +01:00
parent ceb77d506d
commit 70ee1c5301
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
magit-key-mode.el
View file

@ -170,6 +170,10 @@
(branching (branching
(actions (actions
("V" "Branch manager" magit-show-branches)
("B" "Create" magit-create-branch)
("m" "Move" magit-move-branch)
("d" "Delete" magit-delete-branch)
("c" "Checkout" magit-checkout))) ("c" "Checkout" magit-checkout)))
(tagging (tagging
@ -369,7 +373,7 @@ put it in magit-key-mode-key-maps for fast lookup."
(max-size 70)) (max-size 70))
(while strings (while strings
(let ((str (car strings))) (let ((str (car strings)))
(let ((padding (make-string (- (+ longest-act 5) (length str)) ? ))) (let ((padding (make-string (- (+ longest-act 3) (length str)) ? )))
(insert str) (insert str)
(if (and (> (+ (current-column) longest-act) max-size) (if (and (> (+ (current-column) longest-act) max-size)
(cdr strings)) (cdr strings))