andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(pcomplete-entries): Don't set `above-cutoff' to a value unless

Browse source 
pcomplete-cycle-cutoff-length is non-nil.
This commit is contained in:
John Wiegley 2002-08-05 20:07:12 +00:00
parent 86d98c330d
commit d86e0c59ec
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/pcomplete.el
View file

@ -735,8 +735,9 @@ component, DEFAULT-DIRECTORY is used as the basis for completion."
(string-match pcomplete-dir-ignore file))
(and pcomplete-file-ignore
(string-match pcomplete-file-ignore file))))))))
(setq above-cutoff (> (length completions)
pcomplete-cycle-cutoff-length))
(setq above-cutoff (and pcomplete-cycle-cutoff-length
(> (length completions)
pcomplete-cycle-cutoff-length)))
(sort completions
(function
(lambda (l r)