Allow symbol or string for building package.

This makes sense since functions such as package-build-checkout take a
symbol as argument.  Preferably package-build should use one of them all
over place and not mix.
This commit is contained in:
Johan Andersson 2014-01-28 19:04:50 +01:00
parent e3a3977e12
commit f3ea2a3c60

View file

@ -841,6 +841,8 @@ syntax is currently only documented in the MELPA README. You can
simply pass `package-build-default-files-spec' in most cases.
Returns the archive entry for the package."
(when (symbolp package-name)
(setq package-name (symbol-name package-name)))
(let ((files (package-build-expand-file-specs source-dir file-specs)))
(cond
((not version)