# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1137119730 0
# Node ID c9545d6c538f0fed1288cdaaad778160b940c2b7
# Parent  fca6909a92e84216b7c2ed48c3ba2e9b280a2c06
	(custom-theme-add-variable): Don't add `custom-enabled-themes'.

diff -r fca6909a92e8 -r c9545d6c538f lisp/cus-theme.el
--- a/lisp/cus-theme.el	Fri Jan 13 02:30:03 2006 +0000
+++ b/lisp/cus-theme.el	Fri Jan 13 02:35:30 2006 +0000
@@ -160,6 +160,8 @@
 	   (message "%s is already in the theme" (symbol-name symbol)))
 	  ((not (boundp symbol))
 	   (message "%s is not defined as a variable" (symbol-name symbol)))
+	  ((eq symbol 'custom-enabled-themes)
+	   (message "Custom theme cannot contain `custom-enabled-themes'"))
 	  (t
 	   (widget-insert "\n")
 	   (let ((widget (widget-create 'custom-variable