From: Lute Kamstra <lute@gnu.org>
Date: Mon, 14 Feb 2005 12:13:12 +0000 (+0000)
Subject: (all): Check if symbol is void.
X-Git-Tag: ttn-vms-21-2-B4~2291
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=92233e7e393a57c8219b94baf0e925bed9f77c2b;p=emacs.git

(all): Check if symbol is void.
---

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