github/melpa
1
0
Fork 0
mirror of https://github.com/correl/melpa.git synced 2024-12-23 03:00:12 +00:00
Code Issues Projects Releases Packages Wiki Activity

"Version" headers are case-insensitive

Browse source
This commit is contained in:
Steve Purcell 2014-12-19 21:50:04 +00:00
parent 9e191b1ab6
commit 26f9176e11
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
package-build.el
View file

@ -689,7 +689,8 @@ Optionally PRETTY-PRINT the data."
(defun pb/update-or-insert-version (version) (defun pb/update-or-insert-version (version)
"Ensure current buffer has a \"Version: VERSION\" header." "Ensure current buffer has a \"Version: VERSION\" header."
(goto-char (point-min)) (goto-char (point-min))
(if (re-search-forward "^;+* *Version *: *" nil t) (if (let ((case-fold-search t))
(re-search-forward "^;+* *Version *: *" nil t))
(progn (progn
(move-beginning-of-line nil) (move-beginning-of-line nil)
(search-forward "V" nil t) (search-forward "V" nil t)