/[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.7 by pj, Sun Jul 15 19:53:53 2001 UTC revision 1.8 by pj, Sat Feb 16 09:37:54 2002 UTC
# Line 277  to writing a completion function." Line 277  to writing a completion function."
277    ;; `pcomplete-arg-quote-list' should only be set after all the    ;; `pcomplete-arg-quote-list' should only be set after all the
278    ;; load-hooks for any other extension modules have been run, which    ;; load-hooks for any other extension modules have been run, which
279    ;; is true at the time `eshell-mode-hook' is run    ;; is true at the time `eshell-mode-hook' is run
   (make-local-hook 'eshell-mode-hook)  
280    (add-hook 'eshell-mode-hook    (add-hook 'eshell-mode-hook
281              (function              (function
282               (lambda ()               (lambda ()
283                 (set (make-local-variable 'pcomplete-arg-quote-list)                 (set (make-local-variable 'pcomplete-arg-quote-list)
284                      eshell-special-chars-outside-quoting))) nil t)                      eshell-special-chars-outside-quoting))) nil t)
   (make-local-hook 'pcomplete-quote-arg-hook)  
285    (add-hook 'pcomplete-quote-arg-hook 'eshell-quote-backslash nil t)    (add-hook 'pcomplete-quote-arg-hook 'eshell-quote-backslash nil t)
286    (define-key eshell-mode-map [(meta tab)] 'lisp-complete-symbol)    (define-key eshell-mode-map [(meta tab)] 'lisp-complete-symbol)
287    (define-key eshell-mode-map [(meta control ?i)] 'lisp-complete-symbol)    (define-key eshell-mode-map [(meta control ?i)] 'lisp-complete-symbol)

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

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