changeset 60057:c81f31db6e84

(all): Check if symbol is void.
author Lute Kamstra <lute@gnu.org>
date Mon, 14 Feb 2005 12:13:12 +0000
parents 978d83f0a49f
children b8efb42f15ec
files lisp/cus-start.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/cus-start.el	Mon Feb 14 12:12:04 2005 +0000
+++ b/lisp/cus-start.el	Mon Feb 14 12:13:12 2005 +0000
@@ -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 @@
 	  ;; 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