(comint-replace-by-expanded-filename): Do nothing if

comint-match-partial-filename returns nil.

1 files changed, 4 insertions, 2 deletions

diff --git a/lisp/comint.el b/lisp/comint.el
index 0c1dcbd7f52..0fb22b3341c 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -2756,8 +2756,10 @@ removed, and the filename is made absolute instead of relative.  For expansion
 see `expand-file-name' and `substitute-in-file-name'.  For completion see
 `comint-dynamic-complete-filename'."
   (interactive)
-  (replace-match (expand-file-name (comint-match-partial-filename)) t t)
-  (comint-dynamic-complete-filename))
+  (let ((filename (comint-match-partial-filename)))
+    (when filename
+      (replace-match (expand-file-name filename) t t)
+      (comint-dynamic-complete-filename))))
 
 
 (defun comint-dynamic-simple-complete (stub candidates)