mirror of
https://github.com/correl/melpa.git
synced 2025-03-20 09:19:22 -09:00
parent
8ab0a02481
commit
98663a34f8
1 changed files with 5 additions and 8 deletions
|
@ -731,14 +731,11 @@ FILES is a list of (SOURCE . DEST) relative filepath pairs."
|
||||||
(pb/update-or-insert-version version)
|
(pb/update-or-insert-version version)
|
||||||
(pb/ensure-ends-here-line pkg-source)
|
(pb/ensure-ends-here-line pkg-source)
|
||||||
(write-file pkg-target nil)
|
(write-file pkg-target nil)
|
||||||
(let ((valid-package))
|
(condition-case err
|
||||||
(unwind-protect
|
(package-buffer-info)
|
||||||
(progn
|
('error
|
||||||
(package-buffer-info)
|
(message "Warning: %S" err)))
|
||||||
(setq valid-package t))
|
(kill-buffer)))
|
||||||
(kill-buffer)
|
|
||||||
(unless valid-package
|
|
||||||
(delete-file pkg-target))))))
|
|
||||||
|
|
||||||
(pb/write-pkg-readme (and (> (length pkg-info) 4) (aref pkg-info 4))
|
(pb/write-pkg-readme (and (> (length pkg-info) 4) (aref pkg-info 4))
|
||||||
file-name)
|
file-name)
|
||||||
|
|
Loading…
Add table
Reference in a new issue