github/melpa
1
0
Fork 0
mirror of https://github.com/correl/melpa.git synced 2025-04-04 01:06:05 -09:00
Code Issues Projects Releases Packages Wiki Activity

Include *.el.in in the default files list, and rename to .el on copy

Browse source
This commit is contained in:
Steve Purcell 2013-07-22 10:11:44 +01:00
parent 42f3015298
commit 74c5af6e1a
1 changed files with 8 additions and 2 deletions

10
package-build.el
View file

@ -84,7 +84,7 @@ function for access to this function")
(defvar pb/archive-alist-initialized nil (defvar pb/archive-alist-initialized nil
"Determines if pb/archive-alist has been initialized.") "Determines if pb/archive-alist has been initialized.")
(defconst pb/default-files-spec '("*.el" "dir" (defconst pb/default-files-spec '("*.el" "*.el.in" "dir"
"*.info" "*.texi" "*.texinfo" "*.info" "*.texi" "*.texinfo"
"doc/*.info" "doc/*.texi" "doc/*.texinfo" "doc/*.info" "doc/*.texi" "doc/*.texinfo"
(:exclude "*-test.el" "*-tests.el")) (:exclude "*-test.el" "*-tests.el"))
@ -662,7 +662,13 @@ file path and DEST is the relative path to which it should be copied."
(concat prefix (car entry))))) (concat prefix (car entry)))))
(nconc (nconc
lst (mapcar (lambda (f) lst (mapcar (lambda (f)
(cons f (concat prefix (file-name-nondirectory f)))) (let ((destname)))
(cons f
(concat prefix
(replace-regexp-in-string
"\\.in\\'"
""
(file-name-nondirectory f)))))
(file-expand-wildcards entry)))))))) (file-expand-wildcards entry))))))))