Mercurial > emacs
changeset 85833:efa76b2f6668
(elp-unload-hook): Remove function and variable.
(elp-unload-function): New-style unload function,
adapted from `elp-unload-hook'.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Wed, 31 Oct 2007 12:46:08 +0000 |
| parents | 0d668376c2e1 |
| children | 7400d979a9d9 |
| files | lisp/emacs-lisp/elp.el |
| diffstat | 1 files changed, 5 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/elp.el Wed Oct 31 12:39:44 2007 +0000 +++ b/lisp/emacs-lisp/elp.el Wed Oct 31 12:46:08 2007 +0000 @@ -626,9 +626,11 @@ (and elp-reset-after-results (elp-reset-all)))) -(defun elp-unload-hook () - (elp-restore-all)) -(add-hook 'elp-unload-hook 'elp-unload-hook) +(defun elp-unload-function () + "Unload the Emacs Lisp Profiler." + (elp-restore-all) + ;; continue standard unloading + nil) (provide 'elp)