# HG changeset patch
# User Roland McGrath <roland@gnu.org>
# Date 744364330 0
# Node ID 4d7048ac2a72c2f8546a716ab29c7d731f6a69f0
# Parent  e608866e49aaecc5828c343637054b3ac695ad09
(comint-dynamic-list-completions): Expand PATHDIR in call to
file-name-completion.

diff -r e608866e49aa -r 4d7048ac2a72 lisp/comint.el
--- a/lisp/comint.el	Tue Aug 03 07:28:04 1993 +0000
+++ b/lisp/comint.el	Tue Aug 03 07:52:10 1993 +0000
@@ -1214,7 +1214,9 @@
 	 (pathnondir (file-name-nondirectory pathname))
 	 (completions
 	  (file-name-all-completions pathnondir
-				     (or pathdir default-directory))))
+				     (if pathdir
+					 (expand-file-name pathdir)
+				       default-directory))))
     (cond ((null completions)
 	   (message "No completions of %s" pathname)
 	   (ding))