diff options
| author | Juri Linkov <juri@linkov.net> | 2020-09-10 21:58:26 +0300 |
|---|---|---|
| committer | Juri Linkov <juri@linkov.net> | 2020-09-10 21:58:26 +0300 |
| commit | 27b711f834a12384e31ac624a586711c5d07af6b (patch) | |
| tree | d786c12d2021b65597074ab74cd005ec3b99af26 | |
| parent | 4ba71eee8d8991c95028df40cb784cb9cb2e964d (diff) | |
| download | emacs-27b711f834a12384e31ac624a586711c5d07af6b.tar.gz | |
; Fix typos in format-prompt
| -rw-r--r-- | lisp/calc/calcalg3.el | 2 | ||||
| -rw-r--r-- | lisp/misearch.el | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lisp/calc/calcalg3.el b/lisp/calc/calcalg3.el index 75e691a28ff..2d38c9c45bc 100644 --- a/lisp/calc/calcalg3.el +++ b/lisp/calc/calcalg3.el @@ -472,7 +472,7 @@ (setq defc (calc-invent-parameter-variables nc defv))) (let ((vars (read-string (format-prompt "Fitting variables" - (format "%s; %s)" + (format "%s; %s" (mapconcat 'symbol-name (mapcar (function (lambda (v) (nth 1 v))) diff --git a/lisp/misearch.el b/lisp/misearch.el index 7796df49c4e..36a7afe518c 100644 --- a/lisp/misearch.el +++ b/lisp/misearch.el @@ -317,7 +317,7 @@ Every next/previous file in the defined sequence is visited by "Return a list of files specified interactively, one by one." ;; Most code from `multi-occur'. (let* ((files (list (read-file-name - (format-prompt "First file to search: " + (format-prompt "First file to search" (file-name-nondirectory buffer-file-name)) default-directory buffer-file-name))) (file nil)) |