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

Added Pickaxe options.

Browse source
This commit is contained in:
Phil Jackson 2010-09-15 13:52:10 +01:00
parent 2af8e2ece0
commit 7058e07b9f
1 changed files with 7 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
magit-key-mode.el
View file

@ -27,11 +27,13 @@
("-m" "Only merge commits" "--merges")
("-f" "First parent" "--first-parent")
("-i" "Case insesnitive patterns" "-i")
("-p" "Pickaxe regex" "--pickaxe-regex")
("-a" "All" "--all"))
(arguments
("=b" "Branches" "--branches" read-from-minibuffer)
("=a" "Author" "--author" read-from-minibuffer)
("=g" "Grep" "--grep" read-from-minibuffer)))
("=b" "Branches" "--branches=" read-from-minibuffer)
("=s" "Pickaxe search" "-S" read-from-minibuffer)
("=a" "Author" "--author=" read-from-minibuffer)
("=g" "Grep" "--grep=" read-from-minibuffer)))
(running
(actions
@ -47,7 +49,7 @@
("-al" "All" "--all"))
("-e" "Allow empty" "--allow-empty")
(arguments
("=au" "Author" "--author" read-from-minibuffer)))
("=au" "Author" "--author=" read-from-minibuffer)))
(fetching
(actions
@ -187,7 +189,7 @@ put it in magit-key-mode-key-maps for fast lookup."
(let ((args '()))
;; why can't maphash return a list?!
(maphash (lambda (k v)
(push (concat k "=" (shell-quote-argument v)) args))
(push (concat k (shell-quote-argument v)) args))
magit-key-mode-current-args)
(let ((magit-custom-options (append args magit-key-mode-current-options)))
(set-window-configuration magit-log-mode-window-conf)