From fd9fe574300d88c34a22d5bb7b4c31106b777b03 Mon Sep 17 00:00:00 2001 Message-Id: From: Mark Wooding Date: Sat, 1 Aug 2009 23:16:13 +0200 Subject: [PATCH] stgit.el: Refactor: remove unused argument to two functions MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Organization: Straylight/Edgeware From: Gustav HÃ¥llberg Signed-off-by: Gustav HÃ¥llberg --- contrib/stgit.el | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) diff --git a/contrib/stgit.el b/contrib/stgit.el index c013a83..97a6d13 100644 --- a/contrib/stgit.el +++ b/contrib/stgit.el @@ -876,13 +876,13 @@ (defun stgit-show () (goto-char (point-min)) (diff-mode)))) -(defun stgit-move-change-to-index (file status) +(defun stgit-move-change-to-index (file) "Copies the workspace state of FILE to index, using git add or git rm" (let ((op (if (file-exists-p file) "add" "rm"))) (stgit-capture-output "*git output*" (stgit-run-git op "--" file)))) -(defun stgit-remove-change-from-index (file status) +(defun stgit-remove-change-from-index (file) "Unstages the change in FILE from the index" (stgit-capture-output "*git output*" (stgit-run-git "reset" "-q" "--" file))) @@ -895,11 +895,9 @@ (defun stgit-file-toggle-index () (error "No file on the current line")) (let ((patch-name (stgit-patch-name-at-point))) (cond ((eq patch-name :work) - (stgit-move-change-to-index (stgit-file-file patched-file) - (stgit-file-status patched-file))) + (stgit-move-change-to-index (stgit-file-file patched-file))) ((eq patch-name :index) - (stgit-remove-change-from-index (stgit-file-file patched-file) - (stgit-file-status patched-file))) + (stgit-remove-change-from-index (stgit-file-file patched-file))) (t (error "Can only move files in the working tree to index"))))) (stgit-refresh-worktree) -- [mdw]