mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-03 08:30:09 +00:00
* lisp/vc/vc-bzr.el (vc-bzr-after-dir-status): Ignore ignored files.
Fixes: debbugs:9726
This commit is contained in:
parent
293cc56ee2
commit
13754b5435
@ -1,3 +1,8 @@
|
||||
2011-10-19 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* vc/vc-bzr.el (vc-bzr-after-dir-status):
|
||||
Ignore ignored files. (Bug#9726)
|
||||
|
||||
2011-10-19 Chong Yidong <cyd@gnu.org>
|
||||
|
||||
Doc fix for minor modes, stating that an omitted argument enables
|
||||
|
@ -866,7 +866,7 @@ stream. Standard error output is discarded."
|
||||
(" M " . edited) ;; file text modified
|
||||
(" *" . edited) ;; execute bit changed
|
||||
(" M*" . edited) ;; text modified + execute bit changed
|
||||
;; FIXME: what about ignored files?
|
||||
("I " . ignored)
|
||||
(" D " . missing)
|
||||
;; For conflicts, should we list the .THIS/.BASE/.OTHER?
|
||||
("C " . conflict)
|
||||
@ -916,7 +916,7 @@ stream. Standard error output is discarded."
|
||||
(push (list new-name 'edited
|
||||
(vc-bzr-create-extra-fileinfo old-name)) result)))
|
||||
;; do nothing for non existent files
|
||||
((eq translated 'not-found))
|
||||
((memq translated '(not-found ignored)))
|
||||
(t
|
||||
(push (list (file-relative-name
|
||||
(buffer-substring-no-properties
|
||||
|
Loading…
Reference in New Issue
Block a user