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

Add history for magit-read-rev.

Browse source
This commit is contained in:
Nathan Weizenbaum 2010-06-10 21:22:40 -07:00
parent 5744d3ec98
commit 8a37b3c4ab
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
magit.el
View file

@ -302,6 +302,9 @@ Many Magit faces inherit from this one by default."
(defvar magit-completing-read 'completing-read (defvar magit-completing-read 'completing-read
"Function to be called when requesting input from the user.") "Function to be called when requesting input from the user.")
(defvar magit-read-rev-history nil
"The history of inputs to `magit-read-rev'.")
(defvar magit-omit-untracked-dir-contents nil (defvar magit-omit-untracked-dir-contents nil
"When non-nil magit will only list an untracked directory, not its contents.") "When non-nil magit will only list an untracked directory, not its contents.")
@ -587,7 +590,7 @@ return nil."
(format "%s: " prompt))) (format "%s: " prompt)))
(interesting-refs (magit-list-interesting-refs)) (interesting-refs (magit-list-interesting-refs))
(reply (funcall magit-completing-read prompt interesting-refs (reply (funcall magit-completing-read prompt interesting-refs
nil nil nil nil def)) nil nil nil 'magit-read-rev-history def))
(rev (or (cdr (assoc reply interesting-refs)) reply))) (rev (or (cdr (assoc reply interesting-refs)) reply)))
(if (string= rev "") (if (string= rev "")
nil nil