Re: Customization of face fails

[Eli Zaretskii]

> From: Ralf Angeli <address@hidden>
> Date: Sat, 03 Jan 2004 18:48:30 +0100
> 
> When I try to customize a face I receive the following backtrace (I
> edited it to keep it short.  Occurences of `[...]' stand for snipped
> parts.):
> 
> ,----
> | Debugger entered--Lisp error: (void-function nil)

Does this problem go away if you undo (i.e. revert) the patch below
that was installed a few days ago?

Index: lisp/custom.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/custom.el,v
retrieving revision 1.69
retrieving revision 1.70
diff -u -r1.69 -r1.70
--- lisp/custom.el      11 Nov 2003 14:28:53 -0000      1.69
+++ lisp/custom.el      29 Dec 2003 11:53:19 -0000      1.70
@@ -558,17 +558,17 @@
          (error "Keyword %s is missing an argument" keyword))
        (setq args (cdr args))
        (cond ((eq keyword :short-description)
-              (put theme 'theme-short-description short-description))
+              (put theme 'theme-short-description value))
              ((eq keyword :immediate)
-              (put theme 'theme-immediate immediate))
+              (put theme 'theme-immediate value))
              ((eq keyword :variable-set-string)
-              (put theme 'theme-variable-set-string variable-set-string))
+              (put theme 'theme-variable-set-string value))
              ((eq keyword :variable-reset-string)
-              (put theme 'theme-variable-reset-string variable-reset-string))
+              (put theme 'theme-variable-reset-string value))
              ((eq keyword :face-set-string)
-              (put theme 'theme-face-set-string face-set-string))
+              (put theme 'theme-face-set-string value))
              ((eq keyword :face-reset-string)
-              (put theme 'theme-face-reset-string face-reset-string)))))))
+              (put theme 'theme-face-reset-string value)))))))
 
 (defmacro deftheme (theme &optional doc &rest args)
   "Declare custom theme THEME.