From c7c02c2f204e88ed5b08ff5ca6718e33207ebcaf Mon Sep 17 00:00:00 2001 From: Phil Jackson Date: Fri, 26 Mar 2010 16:33:32 +0000 Subject: [PATCH] Added the command `magit-log-grep' (no keybinding). --- magit.el | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/magit.el b/magit.el index 29ff78c7..88dd8120 100644 --- a/magit.el +++ b/magit.el @@ -3105,6 +3105,16 @@ Prefix arg means justify as well." (magit-mode-init topdir 'log #'magit-refresh-log-buffer range "--pretty=oneline" args))) +(defun magit-log-grep (str) + "Search for " + (interactive "sGrep in commit log: ") + (let ((topdir (magit-get-top-dir default-directory))) + (switch-to-buffer "*magit-log-grep*") + (magit-mode-init topdir 'log #'magit-refresh-log-buffer "HEAD" + "--pretty=oneline" + (list "-E" + (format "--grep=%s" (shell-quote-argument str)))))) + (defun magit-log-long (&optional arg) (interactive "P") (let* ((range (if arg