summaryrefslogtreecommitdiff
path: root/lisp/eshell/em-cmpl.el
diff options
context:
space:
mode:
authorJohn Wiegley <johnw@newartisans.com>2005-05-27 02:11:39 +0000
committerJohn Wiegley <johnw@newartisans.com>2005-05-27 02:11:39 +0000
commit34204d803d55e8126575b53368de1826c33253fc (patch)
tree2ac3240e497c4e06fc52cdfbc0696fc4d1ac52be /lisp/eshell/em-cmpl.el
parente07ddddb891c37ac6ecabebf3c86f3b4dda246c7 (diff)
downloademacs-34204d803d55e8126575b53368de1826c33253fc.tar.gz
(eshell-complete-parse-arguments): If the character before a space at
the end of a line is \, assume the space is part of the last argument rather than a final argument separator.
Diffstat (limited to 'lisp/eshell/em-cmpl.el')
-rw-r--r--lisp/eshell/em-cmpl.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/eshell/em-cmpl.el b/lisp/eshell/em-cmpl.el
index 695a9fb4ed8..5f529b07991 100644
--- a/lisp/eshell/em-cmpl.el
+++ b/lisp/eshell/em-cmpl.el
@@ -370,7 +370,8 @@ to writing a completion function."
(setq args (nthcdr (1+ l) args)
posns (nthcdr (1+ l) posns))))
(assert (= (length args) (length posns)))
- (when (and args (eq (char-syntax (char-before end)) ? ))
+ (when (and args (eq (char-syntax (char-before end)) ? )
+ (not (eq (char-before (1- end)) ?\\)))
(nconc args (list ""))
(nconc posns (list (point))))
(cons (mapcar