changeset 26928:755f54893c1f

(custom-declare-variable): Purecopy value.
author Dave Love <fx@gnu.org>
date Thu, 16 Dec 1999 19:42:02 +0000
parents 27d6c0e07ea8
children 76ebda80c4fd
files lisp/custom.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/custom.el	Thu Dec 16 19:41:04 1999 +0000
+++ b/lisp/custom.el	Thu Dec 16 19:42:02 1999 +0000
@@ -135,7 +135,7 @@
 		((eq keyword :require)
 		 (setq requests (cons value requests)))
 		((eq keyword :type)
-		 (put symbol 'custom-type value))
+		 (put symbol 'custom-type (purecopy value)))
 		((eq keyword :options)
 		 (if (get symbol 'custom-options)
 		     ;; Slow safe code to avoid duplicates.