changeset 27289:f6c878d8527c

(tmm-shortcut): Delete region after prompt instead of erasing buffer.
author Gerd Moellmann <gerd@gnu.org>
date Tue, 11 Jan 2000 22:04:24 +0000
parents 6bd57730f71d
children c26a9f95a880
files lisp/tmm.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/tmm.el	Tue Jan 11 21:47:40 2000 +0000
+++ b/lisp/tmm.el	Tue Jan 11 22:04:24 2000 +0000
@@ -372,7 +372,8 @@
 	      (re-search-forward
 	       (concat "\\(^\\|[ \t]\\)" (char-to-string c) tmm-mid-prompt))
 	      (choose-completion))
-	  (erase-buffer)		; In minibuffer
+	  ;; In minibuffer
+	  (delete-region (minibuffer-prompt-end) (point-max))
 	  (mapcar (lambda (elt)
 		    (if (string=
 			 (substring (car elt) 0