[Emacs-diffs] master 65797b1: Make icomplete respect `completion-ignored-extensions'

[Lars Ingebrigtsen]

branch: master
commit 65797b1d75e9f608ffd50fd88be47a854b143bb1
Author: Drew Adams <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Make icomplete respect `completion-ignored-extensions'
    
    * lisp/icomplete.el (icomplete-completions): Heed
    `completion-ignored-extensions' (bug#12939).
---
 etc/NEWS          |    4 ++++
 lisp/icomplete.el |    3 +++
 2 files changed, 7 insertions(+)

diff --git a/etc/NEWS b/etc/NEWS
index c7bc34f..543b3ba 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -56,6 +56,10 @@ affected by this, as SGI stopped supporting IRIX in December 
2013.
 
 * Changes in Emacs 25.2
 
+---
+** icomplete now respects `completion-ignored-extensions'.
+
++++
 ** Non-breaking hypens are now displayed with the `nobreak-hyphen'
 face instead of the `escape-glyph' face.
 
diff --git a/lisp/icomplete.el b/lisp/icomplete.el
index 3b60daa..6a96264 100644
--- a/lisp/icomplete.el
+++ b/lisp/icomplete.el
@@ -388,6 +388,9 @@ matches exist."
        (progn ;;(debug (format "Candidates=%S field=%S" candidates name))
               (format " %sNo matches%s" open-bracket close-bracket))
       (if last (setcdr last nil))
+      (when (and minibuffer-completing-file-name
+                 icomplete-with-completion-tables)
+        (setq comps (completion-pcm--filename-try-filter comps)))
       (let* ((most-try
               (if (and base-size (> base-size 0))
                   (completion-try-completion