From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 4 Oct 2005 20:27:58 +0000 (+0000)
Subject: (iswitchb-buffer-ignore): Label it risky.
X-Git-Tag: emacs-pretest-22.0.90~6822
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1a1dd431f0af67dc07b96fcc785e084da670dfc5;p=emacs.git

(iswitchb-buffer-ignore): Label it risky.

(iswitchb-ignore-buffername-p): Use `functionp'
instead of `fboundp' in order to allow for anonymous functions.
---

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)