From 58c949bc44fac53a8d4d87f8f2ecad7baca522f6 Mon Sep 17 00:00:00 2001 From: Yoni Rabkin Date: Wed, 3 Mar 2021 11:59:33 -0500 Subject: * emms-playing-time.el: add lexical and fix --- emms-playing-time.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/emms-playing-time.el b/emms-playing-time.el index 8b14e16..920c9d5 100644 --- a/emms-playing-time.el +++ b/emms-playing-time.el @@ -1,4 +1,4 @@ -;;; emms-playing-time.el --- Display emms playing time on mode line +;;; emms-playing-time.el --- Display emms playing time on mode line -*- lexical-binding: t; -*- ;; Copyright (C) 2005, 2006, 2007, 2008, 2009, 2019 Free Software Foundation, Inc. @@ -197,10 +197,10 @@ could call `emms-playing-time-enable-display' and (let ((progress "[") ;; percent based on 10 (percent (/ (* emms-playing-time 10) total-playing-time))) - (dotimes (i percent) + (dotimes (_i percent) (setq progress (concat progress "="))) (setq progress (concat progress ">")) - (dotimes (i (- 10 percent)) + (dotimes (_i (- 10 percent)) (setq progress (concat progress " "))) (setq progress (concat progress "]")) (setq emms-playing-time-string progress)))) -- cgit v1.2.3