(ido-ignore-item-p): Allow any kind of functions in ignore lists.
From Michaël Cadilhac.
This commit is contained in:
@@ -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.
|
||||
|
||||
@@ -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)
|
||||
|
||||
Reference in New Issue
Block a user