+(define-derived-mode custom-new-theme-mode nil "New-Theme"
+ "Major mode for the buffer created by `customize-create-theme'.
+Do not call this mode function yourself. It is only meant for internal
+use by `customize-create-theme'."
+ (set-keymap-parent custom-new-theme-mode-map widget-keymap))
+(put 'custom-new-theme-mode 'mode-class 'special)
+
+(defvar custom-theme-name)
+(defvar custom-theme-variables)
+(defvar custom-theme-faces)
+(defvar custom-theme-description)
+
+;;;###autoload
+(defun customize-create-theme ()