From 3d1b2039ecf3a7a97975419d8ecfa36174503adb Mon Sep 17 00:00:00 2001 From: Phil Jackson Date: Wed, 1 Sep 2010 00:07:41 +0100 Subject: [PATCH] Remove unneeded defuns. --- magit.el | 24 ------------------------ 1 file changed, 24 deletions(-) diff --git a/magit.el b/magit.el index 9bf9668e..3a812bf6 100644 --- a/magit.el +++ b/magit.el @@ -3543,35 +3543,11 @@ With a non numeric prefix ARG, show all entries" "--pretty=oneline" args) (magit-log-mode t))) -(defun magit-log-all (&optional arg) - "Display the state of all refs in the log output." - (interactive "P") - (magit-display-log arg "--all")) - -(defun magit-log-first-parent (&optional arg) - "Display the log buffer excluding anything more than first -level commits." - (interactive "P") - (magit-display-log arg "--first-parent")) - (defun magit-log (&optional arg) "View and act upon the output of git log." (interactive "P") (apply 'magit-display-log arg magit-custom-options)) -(defun magit-log-grep (str) - "Search for regexp specified by STR in the commit log." - (interactive "sGrep in commit log: ") - (let ((topdir (magit-get-top-dir default-directory))) - (switch-to-buffer magit-log-grep-buffer-name) - (magit-mode-init topdir 'log #'magit-refresh-log-buffer "HEAD" - "--pretty=oneline" - (append - (list "-E" - (format "--grep=%s" (shell-quote-argument str))) - magit-custom-options)) - (magit-log-mode t))) - (magit-define-command log-long (&optional arg) (interactive "P") (let* ((range (if arg