# HG changeset patch # User Dave Love # Date 972993832 0 # Node ID ef9eb0f5f0b66d7fa76da0ceebea9777b44d242d # Parent 51c874361c842db666b33b8a5ee8a9d28c86d4dc (elp-unload-hook): New function. diff -r 51c874361c84 -r ef9eb0f5f0b6 lisp/emacs-lisp/elp.el --- a/lisp/emacs-lisp/elp.el Tue Oct 31 12:02:51 2000 +0000 +++ b/lisp/emacs-lisp/elp.el Tue Oct 31 12:03:52 2000 +0000 @@ -577,6 +577,9 @@ ;; reset profiling info if desired (and elp-reset-after-results (elp-reset-all)))) + +(defun elp-unload-hook () + (elp-restore-all)) (provide 'elp)