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

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

[elpa] elpa-admin 6d923b9: * elpa-admin.el (elpaa--prune-old-tarballs):


From: Stefan Monnier
Subject: [elpa] elpa-admin 6d923b9: * elpa-admin.el (elpaa--prune-old-tarballs): Fix renaming destination
Date: Thu, 21 Jan 2021 17:19:33 -0500 (EST)

branch: elpa-admin
commit 6d923b905db1eb3beed57d20e5043a5fa9a5d8bb
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    * elpa-admin.el (elpaa--prune-old-tarballs): Fix renaming destination
---
 elpa-admin.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/elpa-admin.el b/elpa-admin.el
index 61265eb..5cb3d26 100644
--- a/elpa-admin.el
+++ b/elpa-admin.el
@@ -446,7 +446,8 @@ Do it without leaving the current branch."
                    (mvfun (lambda (f)
                             (let ((src (expand-file-name f destdir)))
                               (when (file-exists-p src)
-                                (rename-file src (expand-file-name 
olddir)))))))
+                                (rename-file src
+                                             (expand-file-name f olddir)))))))
               (make-directory olddir t)
               (funcall mvfun filename)
               (funcall mvfun sig))))



reply via email to

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