From 207701925a1b18b5ac4020fac34b1257d6582cfb Mon Sep 17 00:00:00 2001 From: Miles Bader Date: Mon, 30 Oct 2000 06:25:26 +0000 Subject: [PATCH] (comint-get-old-input-default): Reword error message. --- lisp/comint.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/comint.el b/lisp/comint.el index 3a02d93ee72..0b2de4aca8a 100644 --- a/lisp/comint.el +++ b/lisp/comint.el @@ -1714,7 +1714,7 @@ value of `comint-use-prompt-regexp-instead-of-fields'." ;; Return the contents of the field at the current point. (let ((pos (field-beginning (point)))) (unless (eq (get-char-property pos 'field) 'input) - (error "Point not in input field")) + (error "Not an input field")) (field-string pos)))) (defun comint-copy-old-input () -- 2.39.5