diff options
Diffstat (limited to 'lisp')
| -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)) |