From: Alexandre Julliard Date: Thu, 13 Sep 2007 09:50:29 +0000 (+0200) Subject: git.el: Allow the add and remove commands to be applied to ignored files. X-Git-Tag: v1.5.4-rc0~446 X-Git-Url: https://git.tokkee.org/?a=commitdiff_plain;h=568d2cde9b9fe0fc6b3202c7987b13289cb1a4a0;p=git.git git.el: Allow the add and remove commands to be applied to ignored files. Signed-off-by: Alexandre Julliard Signed-off-by: Junio C Hamano --- diff --git a/contrib/emacs/git.el b/contrib/emacs/git.el index d1068c625..2d77fd47e 100644 --- a/contrib/emacs/git.el +++ b/contrib/emacs/git.el @@ -902,7 +902,7 @@ Return the list of files that haven't been handled." (defun git-add-file () "Add marked file(s) to the index cache." (interactive) - (let ((files (git-get-filenames (git-marked-files-state 'unknown)))) + (let ((files (git-get-filenames (git-marked-files-state 'unknown 'ignored)))) (unless files (push (file-relative-name (read-file-name "File to add: " nil nil t)) files)) (apply #'git-run-command nil nil "update-index" "--add" "--" files) @@ -920,7 +920,7 @@ Return the list of files that haven't been handled." (defun git-remove-file () "Remove the marked file(s)." (interactive) - (let ((files (git-get-filenames (git-marked-files-state 'added 'modified 'unknown 'uptodate)))) + (let ((files (git-get-filenames (git-marked-files-state 'added 'modified 'unknown 'uptodate 'ignored)))) (unless files (push (file-relative-name (read-file-name "File to remove: " nil nil t)) files)) (if (yes-or-no-p