emacs-diffs
[Top][All Lists]
Advanced

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

[Emacs-diffs] master 0b007bc: Fix issue where a new tempfile was created


From: Mark Oteiza
Subject: [Emacs-diffs] master 0b007bc: Fix issue where a new tempfile was created every refresh
Date: Wed, 18 Nov 2015 18:44:22 +0000

branch: master
commit 0b007bca9004faad67b4ba3dfcb9cf7538ac299c
Author: Mark Oteiza <address@hidden>
Commit: Mark Oteiza <address@hidden>

    Fix issue where a new tempfile was created every refresh
    
    * lisp/mpc.el (mpc-format): Leave dir as relative path
---
 lisp/mpc.el |    5 ++---
 1 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/lisp/mpc.el b/lisp/mpc.el
index af1aac9..c40c09c 100644
--- a/lisp/mpc.el
+++ b/lisp/mpc.el
@@ -1026,12 +1026,11 @@ If PLAYLIST is t or nil or missing, use the main 
playlist."
                                                (substring time (match-end 0))
                                              time)))))
                     (`Cover
-                     (let ((dir (file-name-directory
-                                 (mpc-file-local-copy (cdr (assq 'file 
info))))))
+                     (let ((dir (file-name-directory (cdr (assq 'file info)))))
                        ;; (debug)
                        (push `(equal ',dir (file-name-directory (cdr (assq 
'file info)))) pred)
                        (if-let ((covers '(".folder.png" "cover.jpg" 
"folder.jpg"))
-                                (cover (cl-loop for file in (directory-files 
dir)
+                                (cover (cl-loop for file in (directory-files 
(mpc-file-local-copy dir))
                                                 if (member (downcase file) 
covers)
                                                 return (concat dir file)))
                                 (file (with-demoted-errors "MPC: %s"



reply via email to

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