diff options
| author | Po Lu <luangruo@yahoo.com> | 2022-07-07 13:37:31 +0800 |
|---|---|---|
| committer | Po Lu <luangruo@yahoo.com> | 2022-07-07 13:39:01 +0800 |
| commit | ba63d8783bfd9a484106718346c7dbf6729c4c0f (patch) | |
| tree | d9eee91b7a312e509f500ba4fd28e88cf821d1a7 /lisp/emacs-lisp | |
| parent | b1565431270a3596311f898ab51eccd969dca810 (diff) | |
| download | emacs-ba63d8783bfd9a484106718346c7dbf6729c4c0f.tar.gz emacs-ba63d8783bfd9a484106718346c7dbf6729c4c0f.tar.bz2 emacs-ba63d8783bfd9a484106718346c7dbf6729c4c0f.zip | |
Fix `trace-function' default buffer
* lisp/emacs-lisp/trace.el (trace--read-args): Don't use
format-prompt; instead, use DEF arg to read-buffer.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/trace.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/trace.el b/lisp/emacs-lisp/trace.el index 165f5c7bfe2..7377ac94039 100644 --- a/lisp/emacs-lisp/trace.el +++ b/lisp/emacs-lisp/trace.el @@ -273,7 +273,7 @@ If `current-prefix-arg' is non-nil, also read a buffer and a \"context\" (if default (symbol-name default))))) (when current-prefix-arg (list - (read-buffer (format-prompt "Output to buffer" trace-buffer)) + (read-buffer "Output to buffer" trace-buffer) (let ((exp (let ((minibuffer-completing-symbol t)) (read-from-minibuffer "Context expression: " |