Re: Fix C-M-x on defcustoms

[Andreas Schwab]

Jambunathan K <address@hidden> writes:

> 1. M-x find-library RET vc-dir.el
> 2. C-s defcustom
> 3. C-M-x.  Note the following backtrace.
>
> ,----
> | Debugger entered--Lisp error: (invalid-function (\, (lambda nil nil)))
> |   (\, (lambda nil nil))()
> |   funcall((\, (lambda nil nil)))
> |   eval((funcall (function (\, (lambda nil nil)))) t)
> |   eval-defun-1((custom-declare-variable (quote vc-dir-mode-hook) (\` 
> (funcall (function (\, (lambda nil nil))))) "Normal hook run by 
> `vc-dir-mode'.\nSee `run-hooks'." :type (quote hook) :group (quote vc)))
> |   eval-defun-2()
> |   eval-defun(nil)
> |   call-interactively(eval-defun nil nil)
> `----
>
> It looks to me that it is an issue of orphaned "comma".

Yes, but the real issue is eval-defun-1 stripping off the backquote.  I
have checked in a fix.

Andreas.

-- 
Andreas Schwab, address@hidden
GPG Key fingerprint = 58CA 54C7 6D53 942B 1756  01D3 44D5 214B 8276 4ED5
"And now for something completely different."