github/melpa
1
0
Fork 0
mirror of https://github.com/correl/melpa.git synced 2024-11-14 19:19:32 +00:00
Code Issues Projects Releases Packages Wiki Activity

Handle elisp files which have no "version" header, but are otherwise well-formatted

Browse source
This commit is contained in:
Steve Purcell 2012-04-21 21:07:24 +01:00
parent b5f5bbc7b0
commit eca898099d
1 changed files with 7 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
package-build.el
View file

@ -387,11 +387,15 @@ FILES if non-nil. The file is written to
(ignore-errors
(with-temp-buffer
(insert-file-contents file-path)
;; next two lines are a hack for some packages that aren't
;; next few lines are a hack for some packages that aren't
;; commented properly.
(goto-char (point-min))
(forward-line)
(insert ";;; Version: 0")
(newline)
(goto-char (point-max))
(insert (concat "\n;;; "
(file-name-nondirectory file-path) " ends here"))
(newline)
(insert ";;; " (file-name-nondirectory file-path) " ends here")
(flet ((package-strip-rcs-id (str) "0"))
(package-buffer-info))))))