# HG changeset patch # User Karl Heuer # Date 932444225 0 # Node ID ced85898ea55a918b557bed622b7d188e11f43ae # Parent 03990f1d9e2db2b0563d9b428f1892d0559c5378 (comint-arguments): Handle \ followed by space or tab. diff -r 03990f1d9e2d -r ced85898ea55 lisp/comint.el --- 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 "\\(\"\\([^\"\\]\\|\\\\.\\)*\"\\|\ '[^']*'\\|\