From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 12 Feb 2021 00:06:30 +0000 (-0500)
Subject: * lisp/emacs-lisp/gv.el (gv-place): Simplify
X-Git-Tag: emacs-28.0.90~3797
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3a4b65177f0c26f342e657636ce62e8c16cbb14b;p=emacs.git

* lisp/emacs-lisp/gv.el (gv-place): Simplify
---

diff --git a/lisp/emacs-lisp/gv.el b/lisp/emacs-lisp/gv.el
index 29f8230e6b8..c160aa1fd35 100644
--- a/lisp/emacs-lisp/gv.el
+++ b/lisp/emacs-lisp/gv.el
@@ -307,7 +307,7 @@ The return value is the last VAL in the list.
 ;; Autoload this `put' since a user might use C-u C-M-x on an expression
 ;; containing a non-trivial `push' even before gv.el was loaded.
 ;;;###autoload
-(put 'gv-place 'edebug-form-spec 'edebug-match-form)
+(put 'gv-place 'edebug-form-spec '(form)) ;So-called "indirect spec".
 
 ;; CL did the equivalent of:
 ;;(gv-define-macroexpand edebug-after (lambda (before index place) place))