mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-06 11:55:48 +00:00
Code Issues Releases Activity

(eshell-mode): Use eshell-copy-list instead

Browse Source 
of copy-list.
This commit is contained in:
Gerd Moellmann 2000-06-23 04:54:09 +00:00
parent 047c1280be
commit 4c28e00b63
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/eshell/esh-mode.el
View File

@ -305,7 +305,7 @@ sessions, such as when using `eshell-command'.")
(when eshell-status-in-modeline
(make-local-variable 'eshell-command-running-string)
(let ((fmt (copy-list mode-line-format)))
(let ((fmt (eshell-copy-list mode-line-format)))
(make-local-variable 'mode-line-format)
(setq mode-line-format fmt))
(let ((modeline (memq 'mode-line-modified mode-line-format)))
@ -373,7 +373,7 @@ sessions, such as when using `eshell-command'.")
(set (make-local-variable 'eshell-last-output-end) (point-marker))
(set (make-local-variable 'eshell-last-output-block-begin) (point))
(let ((modules-list (copy-list eshell-modules-list)))
(let ((modules-list (eshell-copy-list eshell-modules-list)))
(make-local-variable 'eshell-modules-list)
(setq eshell-modules-list modules-list))