always remove the old archive before rebuilding

This commit is contained in:
Donald Curtis 2013-03-28 17:05:47 -05:00
parent c7eb3ce90b
commit 1de33588fc

View file

@ -711,6 +711,10 @@ FILES is a list of (SOURCE . DEST) relative filepath pairs."
(file-name-as-directory
(expand-file-name file-name package-build-working-dir))))
(let ((archive-entry (assq name (package-build-archive-alist))))
(when archive-entry (pb/remove-archive archive-entry)))
(message "\n;;; %s\n" file-name)
(let* ((version (pb/checkout name cfg pkg-cwd))
(files (pb/expand-config-file-list pkg-cwd cfg))