diff options
| author | Glenn Morris | 2011-03-04 19:53:41 -0800 |
|---|---|---|
| committer | Glenn Morris | 2011-03-04 19:53:41 -0800 |
| commit | a9eeff78d5bdcb9e03055376705e8f31fe145b79 (patch) | |
| tree | d1324a268a41de5545d6d4f16fc89ab223e341e3 /lisp/eshell/esh-mode.el | |
| parent | 85a55d3871ce4efbde1666bd48b4fca1c638ee99 (diff) | |
| download | emacs-a9eeff78d5bdcb9e03055376705e8f31fe145b79.tar.gz emacs-a9eeff78d5bdcb9e03055376705e8f31fe145b79.zip | |
Make eshell-for obsolete (replaced by dolist)
* eshell/esh-util.el (eshell-for): Make it obsolete.
* eshell/em-alias.el (eshell/alias, eshell-alias-completions):
* eshell/em-dirs.el (eshell-save-some-last-dir):
* eshell/em-hist.el (eshell-save-some-history, eshell-hist-parse-modifier):
* eshell/em-ls.el (eshell-ls-dir, eshell-ls-files, eshell-ls-entries):
* eshell/em-unix.el (eshell/cat, eshell/du, eshell/su):
* eshell/esh-cmd.el (eshell-invoke-directly, eshell-do-eval, eshell/which):
* eshell/esh-ext.el (eshell-find-interpreter):
* eshell/esh-mode.el (eshell-mode):
* eshell/esh-module.el (eshell-unload-extension-modules):
* eshell/esh-proc.el (eshell-process-interact):
* eshell/esh-test.el (eshell-test):
* eshell/esh-util.el (eshell-flatten-list, eshell-winnow-list):
* eshell/esh-var.el (eshell/env, eshell-environment-variables)
(eshell-variables-list):
* eshell/eshell.el (eshell-unload-all-modules):
Replace eshell-for with dolist.
Diffstat (limited to 'lisp/eshell/esh-mode.el')
| -rw-r--r-- | lisp/eshell/esh-mode.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/eshell/esh-mode.el b/lisp/eshell/esh-mode.el index 3735ee35fd5..3b566ead0e5 100644 --- a/lisp/eshell/esh-mode.el +++ b/lisp/eshell/esh-mode.el | |||
| @@ -389,7 +389,7 @@ This is used by `eshell-watch-for-password-prompt'." | |||
| 389 | ;; load extension modules into memory. This will cause any global | 389 | ;; load extension modules into memory. This will cause any global |
| 390 | ;; variables they define to be visible, since some of the core | 390 | ;; variables they define to be visible, since some of the core |
| 391 | ;; modules sometimes take advantage of their functionality if used. | 391 | ;; modules sometimes take advantage of their functionality if used. |
| 392 | (eshell-for module eshell-modules-list | 392 | (dolist (module eshell-modules-list) |
| 393 | (let ((module-fullname (symbol-name module)) | 393 | (let ((module-fullname (symbol-name module)) |
| 394 | module-shortname) | 394 | module-shortname) |
| 395 | (if (string-match "^eshell-\\(.*\\)" module-fullname) | 395 | (if (string-match "^eshell-\\(.*\\)" module-fullname) |
| @@ -404,12 +404,12 @@ This is used by `eshell-watch-for-password-prompt'." | |||
| 404 | (eshell-make-private-directory eshell-directory-name t)) | 404 | (eshell-make-private-directory eshell-directory-name t)) |
| 405 | 405 | ||
| 406 | ;; load core Eshell modules for this session | 406 | ;; load core Eshell modules for this session |
| 407 | (eshell-for module (eshell-subgroups 'eshell) | 407 | (dolist (module (eshell-subgroups 'eshell)) |
| 408 | (run-hooks (intern-soft (concat (symbol-name module) | 408 | (run-hooks (intern-soft (concat (symbol-name module) |
| 409 | "-load-hook")))) | 409 | "-load-hook")))) |
| 410 | 410 | ||
| 411 | ;; load extension modules for this session | 411 | ;; load extension modules for this session |
| 412 | (eshell-for module eshell-modules-list | 412 | (dolist (module eshell-modules-list) |
| 413 | (let ((load-hook (intern-soft (concat (symbol-name module) | 413 | (let ((load-hook (intern-soft (concat (symbol-name module) |
| 414 | "-load-hook")))) | 414 | "-load-hook")))) |
| 415 | (if (and load-hook (boundp load-hook)) | 415 | (if (and load-hook (boundp load-hook)) |