Mercurial > emacs

diff lisp/comint.el @ 112425:9f7614f1a892

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge from emacs-23
author Glenn Morris <rgm@gnu.org>
date Sat, 22 Jan 2011 11:36:45 -0800
parents 75fb060ecbc3 36dcbf24a6f1
children
line wrap: on
line diff
--- a/lisp/comint.el	Sat Jan 22 17:21:38 2011 +0100
+++ b/lisp/comint.el	Sat Jan 22 11:36:45 2011 -0800
@@ -1294,7 +1294,9 @@
 		   (message "Relative reference exceeds input history size"))))
 	      ((or (looking-at "!!?:?\\([0-9^$*-]+\\)") (looking-at "!!"))
 	       ;; Just a number of args from the previous input line.
-	       (replace-match (comint-previous-input-string 0) t t)
+	       (replace-match (comint-args (comint-previous-input-string 0)
+					   (match-beginning 1) (match-end 1))
+			      t t)
 	       (message "History item: previous"))
 	      ((looking-at
 		"!\\??\\({\\(.+\\)}\\|\\(\\sw+\\)\\)\\(:?[0-9^$*-]+\\)?")