From 48e889be9af0f7ad425237758b5beaa7c8747bf8 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 10 Jun 2002 08:32:57 +0000 Subject: [PATCH] (eshell-mode, eshell-mode): Use copy-sequence. --- lisp/eshell/esh-mode.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/eshell/esh-mode.el b/lisp/eshell/esh-mode.el index 4e031b0e0b8..d4df95ea0f7 100644 --- a/lisp/eshell/esh-mode.el +++ b/lisp/eshell/esh-mode.el @@ -305,7 +305,7 @@ This is used by `eshell-watch-for-password-prompt'." (when eshell-status-in-modeline (make-local-variable 'eshell-command-running-string) - (let ((fmt (eshell-copy-list mode-line-format))) + (let ((fmt (copy-sequence mode-line-format))) (make-local-variable 'mode-line-format) (setq mode-line-format fmt)) (let ((modeline (memq 'mode-line-modified mode-line-format))) @@ -382,7 +382,7 @@ This is used by `eshell-watch-for-password-prompt'." (set (make-local-variable 'eshell-last-output-end) (point-marker)) (set (make-local-variable 'eshell-last-output-block-begin) (point)) - (let ((modules-list (eshell-copy-list eshell-modules-list))) + (let ((modules-list (copy-sequence eshell-modules-list))) (make-local-variable 'eshell-modules-list) (setq eshell-modules-list modules-list))