From c7d6ddf067f95ee477a90f24b0cd123b87d3b78b Mon Sep 17 00:00:00 2001 From: Nick Roberts Date: Sun, 30 Aug 2009 22:24:05 +0000 Subject: [PATCH] (comint-exec-1): Check command is non-null first. Part of gdb-mi.el change (2009-08-28). --- lisp/comint.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/comint.el b/lisp/comint.el index 69fd32d9b3b..36d7de5ec2f 100644 --- a/lisp/comint.el +++ b/lisp/comint.el @@ -790,7 +790,7 @@ buffer. The hook `comint-exec-hook' is run after each exec." 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))) -- 2.39.2