Commits

Anonymous committed ea4de38

Preserve match buffer information in #'comint-word.

Comments (0)

Files changed (2)

+2010-08-28  Aidan Kehoe  <kehoea@parhasard.net>
+
+	* comint.el (comint-word):
+	Preserve match buffer information in this function, avoiding
+	problems in #'comint-match-partial-file-name described in
+	http://mid.gmane.org/4C728493.70107@gmail.com . Thank you for the
+	bug report, Raymond Toy!
+
 2010-07-22  Norbert Koch  <viteno@xemacs.org>
 
 	* Makefile (VERSION): XEmacs package 2.27 released.
 Word constituents are considered to be those in WORD-CHARS, which is like the
 inside of a \"[...]\" (see `skip-chars-forward')."
   (save-excursion
-    (let ((non-word-chars (concat "[^\\\\" word-chars "]")) (here (point)))
+    (let ((non-word-chars (concat "[^\\\\" word-chars "]"))
+          (here (point-marker)))
       (while (and (re-search-backward non-word-chars nil 'move)
 		  ;(memq (char-after (point)) shell-file-name-quote-list)
 		  (eq (preceding-char) ?\\))
 	  (forward-char 1))
       ;; Set match-data to match the entire string.
       (if (< (point) here)
-	  (progn (store-match-data (list (point) here))
+	  (progn (store-match-data (list (point-marker) here))
 		 (match-string 0))))))
 
 (defun comint-substitute-in-file-name (filename)