mirror of
https://github.com/correl/melpa.git
synced 2024-11-24 11:09:51 +00:00
Generate hard build errors when single-file packages are invalid
This commit is contained in:
parent
85e28911e6
commit
a3d2ea68e3
1 changed files with 8 additions and 5 deletions
|
@ -718,11 +718,14 @@ FILES is a list of (SOURCE . DEST) relative filepath pairs."
|
|||
(with-current-buffer (find-file pkg-target)
|
||||
(pb/update-or-insert-version version)
|
||||
(write-file pkg-target nil)
|
||||
(condition-case err
|
||||
(let ((valid-package))
|
||||
(unwind-protect
|
||||
(progn
|
||||
(package-buffer-info)
|
||||
('error
|
||||
(message "Warning: package is uninstallable - package-buffer-info reports:\n%S" err)))
|
||||
(kill-buffer))
|
||||
(setq valid-package t))
|
||||
(kill-buffer)
|
||||
(unless valid-package
|
||||
(delete-file pkg-target)))))
|
||||
|
||||
(pb/write-pkg-readme (and (> (length pkg-info) 4) (aref pkg-info 4))
|
||||
file-name)
|
||||
|
|
Loading…
Reference in a new issue