mirror of
https://github.com/correl/melpa.git
synced 2024-11-28 11:09:55 +00:00
Print a warning when :files is redundant
If a :files spec is provided and expands to the same set of files as package-build-default-files-spec, then print a warning.
This commit is contained in:
parent
a04dd517e0
commit
686ee3a775
1 changed files with 5 additions and 1 deletions
|
@ -856,6 +856,10 @@ Returns the archive entry for the package."
|
||||||
(when (symbolp package-name)
|
(when (symbolp package-name)
|
||||||
(setq package-name (symbol-name package-name)))
|
(setq package-name (symbol-name package-name)))
|
||||||
(let ((files (package-build-expand-file-specs source-dir file-specs)))
|
(let ((files (package-build-expand-file-specs source-dir file-specs)))
|
||||||
|
(unless (equal file-specs package-build-default-files-spec)
|
||||||
|
(when (equal files (package-build-expand-file-specs
|
||||||
|
source-dir package-build-default-files-spec nil t))
|
||||||
|
(pb/message "Note: this :files spec is equivalent to the default.")))
|
||||||
(cond
|
(cond
|
||||||
((not version)
|
((not version)
|
||||||
(error "Unable to check out repository for %s" package-name))
|
(error "Unable to check out repository for %s" package-name))
|
||||||
|
|
Loading…
Reference in a new issue