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

Remove debugging function, docs.

Browse source
This commit is contained in:
Phil Jackson 2010-09-17 14:50:18 +01:00
parent 3e91027b5d
commit 790dd88992
1 changed files with 2 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
magit-key-mode.el
View file

@ -221,10 +221,6 @@ put it in magit-key-mode-key-maps for fast lookup."
"A hash-table of current argument set (which will eventually "A hash-table of current argument set (which will eventually
make it to the git command-line).") make it to the git command-line).")
(defun debug-args ()
(interactive)
(maphash (lambda (k v) (print (format "%s: %s" k v))) magit-key-mode-current-args))
(defun magit-key-mode-add-argument (for-group arg-name input-func) (defun magit-key-mode-add-argument (for-group arg-name input-func)
(let ((input (funcall input-func (concat arg-name ": ")))) (let ((input (funcall input-func (concat arg-name ": "))))
(puthash arg-name input magit-key-mode-current-args) (puthash arg-name input magit-key-mode-current-args)
@ -386,7 +382,8 @@ item on one line."
(interactive) (interactive)
(magit-key-mode (quote ,sym)))))) (magit-key-mode (quote ,sym))))))
;; create the interactive functions for the key mode popups ;; create the interactive functions for the key mode popups (which are
;; applied in the top-level key maps)
(mapc (lambda (g) (mapc (lambda (g)
(magit-key-mode-generate (car g))) (magit-key-mode-generate (car g)))
magit-key-mode-groups) magit-key-mode-groups)