emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/emms 58c949b 69/80: * emms-playing-time.el: add lexical


From: Stefan Monnier
Subject: [elpa] externals/emms 58c949b 69/80: * emms-playing-time.el: add lexical and fix
Date: Wed, 17 Mar 2021 18:42:32 -0400 (EDT)

branch: externals/emms
commit 58c949bc44fac53a8d4d87f8f2ecad7baca522f6
Author: Yoni Rabkin <yoni@rabkins.net>
Commit: Yoni Rabkin <yoni@rabkins.net>

    * 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))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]