diff options
| author | Lute Kamstra <lute@gnu.org> | 2005-02-14 12:13:12 +0000 |
|---|---|---|
| committer | Lute Kamstra <lute@gnu.org> | 2005-02-14 12:13:12 +0000 |
| commit | 92233e7e393a57c8219b94baf0e925bed9f77c2b (patch) | |
| tree | 27f11cf85de4c634b6eba8661be384bd30be5fa4 /lisp/cus-start.el | |
| parent | 3ee26b0c2088615cae3ead63b22714d54ffee2ae (diff) | |
| download | emacs-92233e7e393a57c8219b94baf0e925bed9f77c2b.tar.gz | |
(all): Check if symbol is void.
Diffstat (limited to 'lisp/cus-start.el')
| -rw-r--r-- | lisp/cus-start.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/cus-start.el b/lisp/cus-start.el index e59e4166684..25d2d55851b 100644 --- a/lisp/cus-start.el +++ b/lisp/cus-start.el @@ -1,6 +1,6 @@ ;;; cus-start.el --- define customization properties of builtins ;; -;; Copyright (C) 1997, 1999, 2000, 2001, 2002 Free Software Foundation, Inc. +;; Copyright (C) 1997, 1999, 2000, 2001, 2002, 2005 Free Software Foundation, Inc. ;; ;; Author: Per Abrahamsen <abraham@dina.kvl.dk> ;; Keywords: internal @@ -311,7 +311,8 @@ since it could result in memory overflow and make Emacs crash." ;; use the current value as the standard value. standard (if (nthcdr 4 this) (nth 4 this) - (funcall quoter (default-value symbol))) + (when (boundp symbol) + (funcall quoter (default-value symbol)))) ;; Don't complain about missing variables which are ;; irrelevant to this platform. native-p (save-match-data |