From 1e05f390d9f57274c8652e27a38a22cb4178c4a2 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Thu, 11 Dec 2014 10:14:37 -0800 Subject: [PATCH] use cl-loop and cl instead of just loop (which is deprecated) --- emacs_el/configuration/mode-line-cleaner.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/emacs_el/configuration/mode-line-cleaner.el b/emacs_el/configuration/mode-line-cleaner.el index bcd34c7..abc1570 100644 --- a/emacs_el/configuration/mode-line-cleaner.el +++ b/emacs_el/configuration/mode-line-cleaner.el @@ -26,7 +26,7 @@ want to use in the modeline *in lieu of* the original.") (defun clean-mode-line () (interactive) - (loop for cleaner in mode-line-cleaner-alist + (cl-loop for cleaner in mode-line-cleaner-alist do (let* ((mode (car cleaner)) (mode-str (cdr cleaner)) (old-mode-str (cdr (assq mode minor-mode-alist)))) -- 2.39.5