master 4b1ace2: Remove last remaining external uses of `edebug-form-spec`

[Stefan Monnier]

branch: master
commit 4b1ace22be661c15a52bc84c0ee8c0c8c5fe8595
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    Remove last remaining external uses of `edebug-form-spec`
    
    * lisp/emacs-lisp/gv.el (gv-place): Use `def-edebug-elem-spec`.
    
    * lisp/obsolete/erc-compat.el (erc-define-minor-mode): Remove redundant
    `edebug-form-spec`.
---
 lisp/emacs-lisp/gv.el       | 2 +-
 lisp/obsolete/erc-compat.el | 1 -
 lisp/progmodes/etags.el     | 2 +-
 3 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/lisp/emacs-lisp/gv.el b/lisp/emacs-lisp/gv.el
index cbbed06..2b213e2 100644
--- a/lisp/emacs-lisp/gv.el
+++ b/lisp/emacs-lisp/gv.el
@@ -315,7 +315,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 '(form)) ;So-called "indirect spec".
+(def-edebug-elem-spec 'gv-place '(form))
 
 ;; CL did the equivalent of:
 ;;(gv-define-macroexpand edebug-after (lambda (before index place) place))
diff --git a/lisp/obsolete/erc-compat.el b/lisp/obsolete/erc-compat.el
index 3a1699a..9972e92 100644
--- a/lisp/obsolete/erc-compat.el
+++ b/lisp/obsolete/erc-compat.el
@@ -32,7 +32,6 @@
 
 ;;;###autoload(autoload 'erc-define-minor-mode "erc-compat")
 (defalias 'erc-define-minor-mode #'define-minor-mode)
-(put 'erc-define-minor-mode 'edebug-form-spec 'define-minor-mode)
 
 (defun erc-decode-coding-string (s coding-system)
   "Decode S using CODING-SYSTEM."
diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el
index 869529a..023c90c 100644
--- a/lisp/progmodes/etags.el
+++ b/lisp/progmodes/etags.el
@@ -1604,11 +1604,11 @@ that do nothing."
 
 ;; This might be a neat idea, but it's too hairy at the moment.
 ;;(defmacro tags-with-syntax (&rest body)
+;;  (declare (debug t))
 ;;   `(with-syntax-table
 ;;        (with-current-buffer (find-file-noselect (file-of-tag))
 ;;          (syntax-table))
 ;;      ,@body))
-;;(put 'tags-with-syntax 'edebug-form-spec '(&rest form))
 
 ;; exact file name match, i.e. searched tag must match complete file
 ;; name including directories parts if there are some.