branch: elpa-admin
commit 9e01d932a11ebee4a13cb7b47d473709e4ca4a7b
Author: Stefan Monnier <monn...@iro.umontreal.ca>
Commit: Stefan Monnier <monn...@iro.umontreal.ca>
* elpa-admin.el (elpaa--prune-old-tarballs): Return resulting oldtarballs
---
elpa-admin.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/elpa-admin.el b/elpa-admin.el
index 90236d9..e7b7198 100644
--- a/elpa-admin.el
+++ b/elpa-admin.el
@@ -447,7 +447,8 @@ Do it without leaving the current branch."
(cl-assert (not (equal file (file-name-nondirectory tarball))))
;; (elpaa--message "not equal %s and %s" file tarball)
(elpaa--call nil "lzip" (expand-file-name file destdir))
- (setf (cdr oldtarball) (concat file ".lz"))))))
+ (setf (cdr oldtarball) (concat file ".lz")))))
+ oldtarballs)
(defun elpaa--make-one-tarball ( tarball dir pkg-spec metadata
&optional revision-function one-tarball)
