From 4fee0f87b61e02644ea46db6cc75a5f5c8b49b07 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Wed, 26 Sep 2007 00:18:24 +0000 Subject: [PATCH] (viper-setup-master-buffer): Use `mapc' rather than `mapcar'. --- lisp/emulation/viper-util.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/emulation/viper-util.el b/lisp/emulation/viper-util.el index eebf09aed22..7073cd019dd 100644 --- a/lisp/emulation/viper-util.el +++ b/lisp/emulation/viper-util.el @@ -1260,9 +1260,9 @@ Arguments become related buffers. This function should normally be used in the `Local variables' section of a file." (setq viper-related-files-and-buffers-ring (make-ring (1+ (length other-files-or-buffers)))) - (mapcar '(lambda (elt) - (viper-ring-insert viper-related-files-and-buffers-ring elt)) - other-files-or-buffers) + (mapc '(lambda (elt) + (viper-ring-insert viper-related-files-and-buffers-ring elt)) + other-files-or-buffers) (viper-ring-insert viper-related-files-and-buffers-ring (buffer-name)) ) -- 2.39.5