/[emacs]/emacs/lisp/eshell/em-cmpl.el
ViewVC logotype

Diff of /emacs/lisp/eshell/em-cmpl.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.13 by miles, Mon Sep 1 15:45:23 2003 UTC revision 1.14 by johnw, Fri May 27 02:11:39 2005 UTC
# Line 370  to writing a completion function." Line 370  to writing a completion function."
370             (setq args (nthcdr (1+ l) args)             (setq args (nthcdr (1+ l) args)
371                   posns (nthcdr (1+ l) posns))))                   posns (nthcdr (1+ l) posns))))
372      (assert (= (length args) (length posns)))      (assert (= (length args) (length posns)))
373      (when (and args (eq (char-syntax (char-before end)) ? ))      (when (and args (eq (char-syntax (char-before end)) ? )
374                   (not (eq (char-before (1- end)) ?\\)))
375        (nconc args (list ""))        (nconc args (list ""))
376        (nconc posns (list (point))))        (nconc posns (list (point))))
377      (cons (mapcar      (cons (mapcar

Legend:
Removed from v.1.13  
changed lines
  Added in v.1.14

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26