# HG changeset patch # User Richard M. Stallman # Date 1023697977 0 # Node ID 642c25258945f5a90a8241a717c9910e98b4780f # Parent 72f226ee8247444a8e707567102bbc1d427cf716 (eshell-mode, eshell-mode): Use copy-sequence. diff -r 72f226ee8247 -r 642c25258945 lisp/eshell/esh-mode.el --- a/lisp/eshell/esh-mode.el Mon Jun 10 08:32:45 2002 +0000 +++ b/lisp/eshell/esh-mode.el Mon Jun 10 08:32:57 2002 +0000 @@ -305,7 +305,7 @@ (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 @@ (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))