Mercurial > emacs

changeset 24968:ced85898ea55

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(comint-arguments): Handle \ followed by space or tab.
author Karl Heuer <kwzh@gnu.org>
date Tue, 20 Jul 1999 04:17:05 +0000
parents 03990f1d9e2d
children 44087df57d4f
files lisp/comint.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/comint.el	Tue Jul 20 04:16:51 1999 +0000
+++ b/lisp/comint.el	Tue Jul 20 04:17:05 1999 +0000
@@ -1182,7 +1182,8 @@
   "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 @@
   (let* ((first (if (and (eq system-type 'windows-nt) 
 			 (w32-shell-dos-semantics))
 		    "[^ \n\t\"'`]+\\|"
-		  "[^ \n\t\"'`\\]+\\|\\\\[\"'`\\]+\\|"))
+		  "[^ \n\t\"'`\\]+\\|\\\\[\"'`\\ \t]+\\|"))
 	 (argpart (concat first
 			  "\\(\"\\([^\"\\]\\|\\\\.\\)*\"\\|\
 '[^']*'\\|\