From 940cf42ecb1803d6045b80663bad85d4c24bd298 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Mon, 14 May 2001 17:52:12 +0000 Subject: [PATCH] (elp-instrument-package): Don't allow empty prefixes. --- lisp/ChangeLog | 5 +++++ lisp/emacs-lisp/elp.el | 2 ++ 2 files changed, 7 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5f91a19636c..b8f28b24c7a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2001-05-14 Eli Zaretskii + + * emacs-lisp/elp.el (elp-instrument-package): Don't allow empty + prefixes. + 2001-05-14 Gerd Moellmann * hexl.el (hexl-current-address): Print a message when called diff --git a/lisp/emacs-lisp/elp.el b/lisp/emacs-lisp/elp.el index 42dc1bc070b..af189126a09 100644 --- a/lisp/emacs-lisp/elp.el +++ b/lisp/emacs-lisp/elp.el @@ -323,6 +323,8 @@ For example, to instrument all ELP functions, do the following: \\[elp-instrument-package] RET elp- RET" (interactive "sPrefix of package to instrument: ") + (if (zerop (length prefix)) + (error "Instrumenting all Emacs functions would render Emacs unusable.")) (elp-instrument-list (mapcar 'intern -- 2.11.4.GIT