emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Obsolete functions/macros in edebug.el


From: Juanma Barranquero
Subject: Obsolete functions/macros in edebug.el
Date: Fri, 15 Jul 2005 04:24:22 +0200

Is it OK to obsolete these?

  `def-edebug-form-spec'
  `edebug-install-custom-print-funcs'
  `edebug-reset-print-funcs'
  `edebug-uninstall-custom-print-funcs'

All four are marked as obsolete in comments or docstring.

-- 
                    /L/e/k/t/u


Index: lisp/emacs-lisp/edebug.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/emacs-lisp/edebug.el,v
retrieving revision 3.81
diff -c -r3.81 edebug.el
*** lisp/emacs-lisp/edebug.el   11 Jul 2005 04:05:07 -0000      3.81
--- lisp/emacs-lisp/edebug.el   15 Jul 2005 00:32:45 -0000
***************
*** 243,251 ****
    `(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.")
    (def-edebug-spec symbol (eval spec-form)))
  
  (defun get-edebug-spec (symbol)
    ;; Get the spec of symbol resolving all indirection.
--- 243,251 ----
    `(put (quote ,symbol) 'edebug-form-spec (quote ,spec)))
  
  (defmacro def-edebug-form-spec (symbol spec-form)
!   "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,3659 ****
  ;; 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)
  
  (defun edebug-install-custom-print ()
    "Replace print functions used by Edebug with custom versions."
--- 3651,3659 ----
  ;; Replace printing functions.
  
  ;; obsolete names
! (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."




reply via email to

[Prev in Thread] Current Thread [Next in Thread]