# HG changeset patch # User Lute Kamstra # Date 1108383192 0 # Node ID c81f31db6e84255d77ce57982c4d2617b06af58d # Parent 978d83f0a49fc081aa2c404d757f7609ccb5ef92 (all): Check if symbol is void. diff -r 978d83f0a49f -r c81f31db6e84 lisp/cus-start.el --- 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 ;; 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