diff options
| author | Juanma Barranquero | 2007-09-26 00:18:24 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2007-09-26 00:18:24 +0000 |
| commit | 4fee0f87b61e02644ea46db6cc75a5f5c8b49b07 (patch) | |
| tree | cc13650b7d376a0fef5f31bf65b7458bf0e5d94d | |
| parent | 1ca2d34b2d8ea8c353e92ff1fd0408ff80dc5d64 (diff) | |
| download | emacs-4fee0f87b61e02644ea46db6cc75a5f5c8b49b07.tar.gz emacs-4fee0f87b61e02644ea46db6cc75a5f5c8b49b07.zip | |
(viper-setup-master-buffer): Use `mapc' rather than `mapcar'.
| -rw-r--r-- | lisp/emulation/viper-util.el | 6 |
1 files 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 | |||
| 1260 | the `Local variables' section of a file." | 1260 | the `Local variables' section of a file." |
| 1261 | (setq viper-related-files-and-buffers-ring | 1261 | (setq viper-related-files-and-buffers-ring |
| 1262 | (make-ring (1+ (length other-files-or-buffers)))) | 1262 | (make-ring (1+ (length other-files-or-buffers)))) |
| 1263 | (mapcar '(lambda (elt) | 1263 | (mapc '(lambda (elt) |
| 1264 | (viper-ring-insert viper-related-files-and-buffers-ring elt)) | 1264 | (viper-ring-insert viper-related-files-and-buffers-ring elt)) |
| 1265 | other-files-or-buffers) | 1265 | other-files-or-buffers) |
| 1266 | (viper-ring-insert viper-related-files-and-buffers-ring (buffer-name)) | 1266 | (viper-ring-insert viper-related-files-and-buffers-ring (buffer-name)) |
| 1267 | ) | 1267 | ) |
| 1268 | 1268 | ||