branch: externals/emms
commit 58c949bc44fac53a8d4d87f8f2ecad7baca522f6
Author: Yoni Rabkin <[email protected]>
Commit: Yoni Rabkin <[email protected]>
* 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))))