From: Karl Heuer <kwzh@gnu.org>
Date: Tue, 20 Jul 1999 04:17:05 +0000 (+0000)
Subject: (comint-arguments): Handle \ followed by space or tab.
X-Git-Tag: emacs-pretest-21.0.90~7473
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e7cfa73fc0f3fb7c8e23967189f69f8798453d55;p=emacs.git

(comint-arguments): Handle \ followed by space or tab.
---

diff --git a/lisp/comint.el b/lisp/comint.el
index a8019f8ee31..5292c09bf66 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -1182,7 +1182,8 @@ Quotes are single and double."
   "Return from STRING the NTH to MTH arguments.
 NTH and/or MTH can be nil, which means the last argument.
 Returned arguments are separated by single spaces.
-We assume whitespace separates arguments, except within quotes.
+We assume whitespace separates arguments, except within quotes
+and except for a space or tab that immediately follows a backslash.
 Also, a run of one or more of a single character
 in `comint-delimiter-argument-list' is a separate argument.
 Argument 0 is the command name."
@@ -1195,7 +1196,7 @@ Argument 0 is the command name."
   (let* ((first (if (and (eq system-type 'windows-nt) 
 			 (w32-shell-dos-semantics))
 		    "[^ \n\t\"'`]+\\|"
-		  "[^ \n\t\"'`\\]+\\|\\\\[\"'`\\]+\\|"))
+		  "[^ \n\t\"'`\\]+\\|\\\\[\"'`\\ \t]+\\|"))
 	 (argpart (concat first
 			  "\\(\"\\([^\"\\]\\|\\\\.\\)*\"\\|\
 '[^']*'\\|\