diff options
Diffstat (limited to 'lisp/eshell/em-hist.el')
| -rw-r--r-- | lisp/eshell/em-hist.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/eshell/em-hist.el b/lisp/eshell/em-hist.el index 5ec529f4b8f..993e9d63a94 100644 --- a/lisp/eshell/em-hist.el +++ b/lisp/eshell/em-hist.el @@ -70,8 +70,9 @@ ;;; User Variables: -(defcustom eshell-hist-load-hook '(eshell-hist-initialize) +(defcustom eshell-hist-load-hook nil "A list of functions to call when loading `eshell-hist'." + :version "24.1" ; removed eshell-hist-initialize :type 'hook :group 'eshell-hist) @@ -292,7 +293,7 @@ element, regardless of any text on the command line. In that case, (defun eshell-save-some-history () "Save the history for any open Eshell buffers." - (eshell-for buf (buffer-list) + (dolist (buf (buffer-list)) (if (buffer-live-p buf) (with-current-buffer buf (if (and eshell-mode @@ -730,7 +731,7 @@ matched." (narrow-to-region here (point)) (goto-char (point-min)) (let ((modifiers (cdr (eshell-parse-modifiers)))) - (eshell-for mod modifiers + (dolist (mod modifiers) (setq hist (funcall mod hist))) hist)) (delete-region here (point))))) |