Mercurial > hg > xemacs-beta

diff lisp/comint/comint.el @ 171:929b76928fce r20-3b12

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b12
author cvs
date Mon, 13 Aug 2007 09:47:52 +0200
parents 15872534500d
children e45d5e7c476e
line wrap: on
line diff
--- a/lisp/comint/comint.el	Mon Aug 13 09:47:00 2007 +0200
+++ b/lisp/comint/comint.el	Mon Aug 13 09:47:52 2007 +0200
@@ -1103,7 +1103,7 @@
 Returns t if successful."
   (interactive)
   (if (and comint-input-autoexpand
-	   (string-match "[!^]" (funcall comint-get-old-input))
+	   (string-match "!\\|^\\^" (funcall comint-get-old-input))
 	   (save-excursion (beginning-of-line)
 			   (looking-at comint-prompt-regexp)))
       ;; Looks like there might be history references in the command.