# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1121548735 0
# Node ID 3b29f20942e247746d28ec5c727811911b51dcab
# Parent  9fcfa0b883d457a31f3f0235d9fba53901f50c77
(def-edebug-form-spec): Add obsolescence info and delete redundant message.  Doc
fix.
(edebug-install-custom-print-funcs, edebug-reset-print-funcs,
edebug-uninstall-custom-print-funcs): Define as obsolete aliases.

diff -r 9fcfa0b883d4 -r 3b29f20942e2 lisp/emacs-lisp/edebug.el
--- a/lisp/emacs-lisp/edebug.el	Sat Jul 16 21:17:10 2005 +0000
+++ b/lisp/emacs-lisp/edebug.el	Sat Jul 16 21:18:55 2005 +0000
@@ -243,9 +243,9 @@
   `(put (quote ,symbol) 'edebug-form-spec (quote ,spec)))
 
 (defmacro def-edebug-form-spec (symbol spec-form)
-  "For compatibility with old version.  Use `def-edebug-spec' instead."
-  (message "Obsolete: use def-edebug-spec instead.")
+  "For compatibility with old version."
   (def-edebug-spec symbol (eval spec-form)))
+(make-obsolete 'def-edebug-form-spec 'def-edebug-spec "22.1")
 
 (defun get-edebug-spec (symbol)
   ;; Get the spec of symbol resolving all indirection.
@@ -3651,9 +3651,12 @@
 ;; Replace printing functions.
 
 ;; obsolete names
-(defalias 'edebug-install-custom-print-funcs 'edebug-install-custom-print)
-(defalias 'edebug-reset-print-funcs 'edebug-uninstall-custom-print)
-(defalias 'edebug-uninstall-custom-print-funcs 'edebug-uninstall-custom-print)
+(define-obsolete-function-alias 'edebug-install-custom-print-funcs
+    'edebug-install-custom-print "22.1")
+(define-obsolete-function-alias 'edebug-reset-print-funcs
+    'edebug-uninstall-custom-print "22.1")
+(define-obsolete-function-alias 'edebug-uninstall-custom-print-funcs
+    'edebug-uninstall-custom-print "22.1")
 
 (defun edebug-install-custom-print ()
   "Replace print functions used by Edebug with custom versions."