aboutsummaryrefslogtreecommitdiff
path: root/evil-command-window.el
diff options
context:
space:
mode:
authorFrank Fischer <frank-fischer@shadow-soft.de>2016-04-04 08:47:20 +0200
committerFrank Fischer <frank-fischer@shadow-soft.de>2016-04-04 08:47:20 +0200
commit34084e84b12508ab2b19b4c1516a73ac9e20a843 (patch)
tree0d61ec85a7f5dc3df9175f858ad5d048ee40219d /evil-command-window.el
parent565c86528993c78f298626a2c801016bf515c9e0 (diff)
command-window: Replace `mapc` by `dolist`
Diffstat (limited to 'evil-command-window.el')
-rw-r--r--evil-command-window.el11
1 files changed, 5 insertions, 6 deletions
diff --git a/evil-command-window.el b/evil-command-window.el
index 09c01ea..45b2a8e 100644
--- a/evil-command-window.el
+++ b/evil-command-window.el
@@ -52,12 +52,11 @@ the key whose history is being shown (one of \":\", \"/\", or
execute on the result that the user selects."
(when (eq major-mode 'evil-command-window-mode)
(user-error "Cannot recursively open command line window"))
- (mapc #'(lambda (win)
- (when (equal (buffer-name (window-buffer win))
- "*Command Line*")
- (kill-buffer (window-buffer win))
- (delete-window win)))
- (window-list))
+ (dolist (win (window-list))
+ (when (equal (buffer-name (window-buffer win))
+ "*Command Line*")
+ (kill-buffer (window-buffer win))
+ (delete-window win)))
(split-window nil
(unless (zerop evil-command-window-height)
evil-command-window-height)