procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Prefer "Package-Version" over "Version" if available

Browse source 
* lisp/emacs-lisp/package-vc.el (package-vc-release-rev): Search for
both in sequence.
This commit is contained in:
Philip Kaludercic 2022-10-30 14:43:10 +01:00
parent 8b49d553b6
commit ec3f102b8c
1 changed files with 7 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lisp/emacs-lisp/package-vc.el
View file

@ -486,8 +486,13 @@ If no such revision can be found, return nil."
(save-excursion
(goto-char (point-min))
(let ((case-fold-search t))
(when (re-search-forward (concat (lm-get-header-re "version") ".*$")
(lm-code-start) t)
(when (cond
((re-search-forward
(concat (lm-get-header-re "package-version") ".*$")
(lm-code-start) t))
((re-search-forward
(concat (lm-get-header-re "version") ".*$")
(lm-code-start) t)))
(ignore-error vc-not-supported
(vc-call-backend (vc-backend (buffer-file-name))
'last-change