1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-28 07:45:00 +00:00

(ido-ignore-item-p): Allow any kind of functions in ignore lists.

From Michaël Cadilhac.
This commit is contained in:
Kim F. Storm 2006-09-14 14:42:49 +00:00
parent cd3587c125
commit bf8b0f8b81
2 changed files with 7 additions and 2 deletions

View File

@ -1,3 +1,8 @@
2006-09-14 Micha,Ak(Bl Cadilhac <michael.cadilhac@lrde.org>
* ido.el (ido-ignore-item-p): Allow any kind of functions in
ignore lists.
2006-09-14 Kim F. Storm <storm@cua.dk>
* jit-lock.el (jit-lock-fontify-again): New function.

View File

@ -3618,7 +3618,7 @@ for first matching file."
((stringp nextstr)
(and (>= flen (setq slen (length nextstr)))
(string-equal (substring name (- flen slen)) nextstr)))
((fboundp nextstr) (funcall nextstr name))
((functionp nextstr) (funcall nextstr name))
(t nil))
(setq ignorep t
ext-list nil
@ -3628,7 +3628,7 @@ for first matching file."
(setq nextstr (car re-list))
(if (cond
((stringp nextstr) (string-match nextstr name))
((fboundp nextstr) (funcall nextstr name))
((functionp nextstr) (funcall nextstr name))
(t nil))
(setq ignorep t
re-list nil)