diff options
| author | Glenn Morris | 2013-05-06 00:20:35 -0700 |
|---|---|---|
| committer | Glenn Morris | 2013-05-06 00:20:35 -0700 |
| commit | 16e343d68693a1cf92a9f7cefffcf221d9950df8 (patch) | |
| tree | ddde216510391c60fcdba50653e736fc45020f0a | |
| parent | 7d889a47ec1e7853cb122fd526510df90cd9fa53 (diff) | |
| download | emacs-16e343d68693a1cf92a9f7cefffcf221d9950df8.tar.gz emacs-16e343d68693a1cf92a9f7cefffcf221d9950df8.zip | |
* lisp/eshell/em-cmpl.el: Simply require pcomplete;
eg we use a bunch of its defcustom properties.
(eshell-cmpl-initialize): No need to load pcomplete.
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/eshell/em-cmpl.el | 3 |
2 files changed, 5 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 84f80c330f3..9da2195fe07 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,9 @@ | |||
| 1 | 2013-05-06 Glenn Morris <rgm@gnu.org> | 1 | 2013-05-06 Glenn Morris <rgm@gnu.org> |
| 2 | 2 | ||
| 3 | * eshell/em-cmpl.el: Simply require pcomplete; eg we use a bunch | ||
| 4 | of its defcustom properties. | ||
| 5 | (eshell-cmpl-initialize): No need to load pcomplete. | ||
| 6 | |||
| 3 | * generic-x.el: No need to require comint when compiling. | 7 | * generic-x.el: No need to require comint when compiling. |
| 4 | 8 | ||
| 5 | * net/eudc-export.el: Make it loadable without bbdb. | 9 | * net/eudc-export.el: Make it loadable without bbdb. |
diff --git a/lisp/eshell/em-cmpl.el b/lisp/eshell/em-cmpl.el index 91311deffcf..4f4b8dd3276 100644 --- a/lisp/eshell/em-cmpl.el +++ b/lisp/eshell/em-cmpl.el | |||
| @@ -68,6 +68,7 @@ | |||
| 68 | ;; with sufficient pointers to locate the relevant help text. | 68 | ;; with sufficient pointers to locate the relevant help text. |
| 69 | 69 | ||
| 70 | ;;; Code: | 70 | ;;; Code: |
| 71 | (require 'pcomplete) | ||
| 71 | 72 | ||
| 72 | (eval-when-compile | 73 | (eval-when-compile |
| 73 | (require 'cl-lib) | 74 | (require 'cl-lib) |
| @@ -242,8 +243,6 @@ to writing a completion function." | |||
| 242 | 243 | ||
| 243 | (defun eshell-cmpl-initialize () | 244 | (defun eshell-cmpl-initialize () |
| 244 | "Initialize the completions module." | 245 | "Initialize the completions module." |
| 245 | (unless (fboundp 'pcomplete) | ||
| 246 | (load "pcmpl-auto" t t)) | ||
| 247 | (set (make-local-variable 'pcomplete-command-completion-function) | 246 | (set (make-local-variable 'pcomplete-command-completion-function) |
| 248 | eshell-command-completion-function) | 247 | eshell-command-completion-function) |
| 249 | (set (make-local-variable 'pcomplete-command-name-function) | 248 | (set (make-local-variable 'pcomplete-command-name-function) |