diff options
| author | Richard M. Stallman <rms@gnu.org> | 2005-10-04 20:27:58 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2005-10-04 20:27:58 +0000 |
| commit | 1a1dd431f0af67dc07b96fcc785e084da670dfc5 (patch) | |
| tree | 29a102ce6f1dec87977013ab4978f7f5f7b426b4 /lisp/iswitchb.el | |
| parent | 49efed3a0f168480c7adea79bd879242be2039f8 (diff) | |
| download | emacs-1a1dd431f0af67dc07b96fcc785e084da670dfc5.tar.gz | |
(iswitchb-buffer-ignore): Label it risky.
(iswitchb-ignore-buffername-p): Use `functionp'
instead of `fboundp' in order to allow for anonymous functions.
Diffstat (limited to 'lisp/iswitchb.el')
| -rw-r--r-- | lisp/iswitchb.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/iswitchb.el b/lisp/iswitchb.el index b13f2d0bb5a..80f7dbcb199 100644 --- a/lisp/iswitchb.el +++ b/lisp/iswitchb.el @@ -293,6 +293,7 @@ with a space, for which the regexp is `^ '. See the source file for example functions that filter buffernames." :type '(repeat (choice regexp function)) :group 'iswitchb) +(put 'iswitchb-buffer-ignore 'risky-local-variable t) (defcustom iswitchb-max-to-show nil "*If non-nil, limit the number of names shown in the minibuffer. @@ -942,7 +943,7 @@ BUFFER-LIST can be list of buffers or list of strings." (progn (setq ignorep t) (setq re-list nil)))) - ((fboundp nextstr) + ((functionp nextstr) (if (funcall nextstr bufname) (progn (setq ignorep t) |