changeset 104740:dc5b8d58abfe

(comint-exec-1): Check command is non-null first. Part of gdb-mi.el change (2009-08-28).
author Nick Roberts <nickrob@snap.net.nz>
date Sun, 30 Aug 2009 22:24:05 +0000
parents 329b26389fdb
children c4f3479db8a4
files lisp/comint.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/comint.el	Sun Aug 30 22:23:15 2009 +0000
+++ b/lisp/comint.el	Sun Aug 30 22:24:05 2009 +0000
@@ -790,7 +790,7 @@
 	      default-directory
 	    "/"))
 	proc decoding encoding changed)
-    (let ((exec-path (if (file-name-directory command)
+    (let ((exec-path (if (and command (file-name-directory command))
 			 ;; If the command has slashes, make sure we
 			 ;; first look relative to the current directory.
 			 (cons default-directory exec-path) exec-path)))