From: Eli Zaretskii Date: Sun, 14 Oct 2001 20:00:28 +0000 (+0000) Subject: (completion-ignored-extensions) [ms-dos, windows-nt]: X-Git-Tag: ttn-vms-21-2-B4~19443 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a12ca05478f3eb4429a1038699f5dad682f4056d;p=emacs.git (completion-ignored-extensions) [ms-dos, windows-nt]: Add .ico, .pif, .lnk, .dll, .drv, .vxd, and .386. Add .so to the Unix and GNU branch. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 54c001cb06b..092173917ba 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,9 @@ 2001-10-14 Eli Zaretskii + * bindings.el (completion-ignored-extensions) [ms-dos, windows-nt]: + Add .ico, .pif, .lnk, .dll, .drv, .vxd, and .386. + Add .so to the Unix and GNU branch. + * international/latin-1.el: * international/latin-2.el: * international/latin-3.el: diff --git a/lisp/bindings.el b/lisp/bindings.el index 606a620e2da..bb4610fa762 100644 --- a/lisp/bindings.el +++ b/lisp/bindings.el @@ -421,15 +421,15 @@ is okay. See `mode-line-format'.") ;; making it more likely you will get a unique match. (setq completion-ignored-extensions (append - (cond ((or (eq system-type 'ms-dos) (eq system-type 'windows-nt)) - '(".o" "~" ".bin" ".bak" ".obj" ".map" - ".a" ".ln" ".blg" ".bbl")) + (cond ((memq system-type '(ms-dos windows-nt)) + '(".o" "~" ".bin" ".bak" ".obj" ".map" ".ico" ".pif" ".lnk" + ".a" ".ln" ".blg" ".bbl" ".dll" ".drv" ".vxd" ".386")) ((eq system-type 'vax-vms) '(".obj" ".exe" ".bin" ".lbin" ".sbin" ".brn" ".rnt" ".lni" ".lis" ".olb" ".tlb" ".mlb" ".hlb")) (t - '(".o" "~" ".bin" ".lbin" + '(".o" "~" ".bin" ".lbin" ".so" ".a" ".ln" ".blg" ".bbl"))) '(".elc" ".lof" ".glo" ".idx" ".lot"