# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 889850538 0
# Node ID 8197c659e85c0461af14dd647cb03e2f19942fc7
# Parent  79a284372cfbcf12d546bbb7192fb8e015d3fe34
(comint-word): store-match-data => set-match-data.

diff -r 79a284372cfb -r 8197c659e85c lisp/comint.el
--- a/lisp/comint.el	Sat Mar 14 04:41:23 1998 +0000
+++ b/lisp/comint.el	Sat Mar 14 04:42:18 1998 +0000
@@ -1983,7 +1983,7 @@
 	(forward-char 1))
       ;; Set match-data to match the entire string.
       (when (< (point) here)
-	(store-match-data (list (point) here))
+	(set-match-data (list (point) here))
 	(match-string 0)))))
 
 (defun comint-substitute-in-file-name (filename)