diff options
author | Stefan Monnier <[email protected]> | 2001-11-16 14:32:38 +0000 |
---|---|---|
committer | Stefan Monnier <[email protected]> | 2001-11-16 14:32:38 +0000 |
commit | 2916afbdfb70852855e591b7e918b79364df0c16 (patch) | |
tree | 85807c64f25e55065a6a78d8d3fa8e57d8f90700 /lisp/desktop.el | |
parent | aa2af83a83dfa179b9d33ea816df2528cb9a080b (diff) |
(desktop-create-buffer): Use functionp.
Diffstat (limited to 'lisp/desktop.el')
-rw-r--r-- | lisp/desktop.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/desktop.el b/lisp/desktop.el index dd1d0b6820..e9791cc0f9 100644 --- a/lisp/desktop.el +++ b/lisp/desktop.el @@ -698,10 +698,9 @@ to provide correct modes for autoloaded files." (cond ((equal '(t) mim) (auto-fill-mode 1)) ; backwards compatible ((equal '(nil) mim) (auto-fill-mode 0)) (t (mapcar #'(lambda (minor-mode) - (unless (or (eq minor-mode t) (eq minor-mode nil)) - (if (and minor-mode (fboundp minor-mode)) - (funcall minor-mode 1)))) - mim))) + (when (functionp minor-mode) + (funcall minor-mode 1))) + mim))) (goto-char pt) (if (consp mk) (progn |