From: Gustav Hållberg <gustav@virtutech.com>
Date: Sat, 1 Aug 2009 21:16:13 +0000 (+0200)
Subject: stgit.el: Refactor: remove unused argument to two functions
X-Git-Tag: v0.15-rc2~11^2~55
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/stgit/commitdiff_plain/fd9fe574300d88c34a22d5bb7b4c31106b777b03

stgit.el: Refactor: remove unused argument to two functions

Signed-off-by: Gustav Hållberg <gustav@virtutech.com>
---

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)