mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-05 22:20:24 -08:00
* admin/admin.el (set-version): Fix handling of official releases.
This commit is contained in:
parent
8ddef0ad4d
commit
ebeca61755
1 changed files with 7 additions and 2 deletions
|
|
@ -128,8 +128,13 @@ Root must be the root of an Emacs source tree."
|
||||||
(submatch (1+ (in "0-9."))))))
|
(submatch (1+ (in "0-9."))))))
|
||||||
(set-version-in-file root "java/AndroidManifest.xml.in"
|
(set-version-in-file root "java/AndroidManifest.xml.in"
|
||||||
(apply #'format "%02d%02d%02d000"
|
(apply #'format "%02d%02d%02d000"
|
||||||
|
(let ((ver-list
|
||||||
(mapcar #'string-to-number
|
(mapcar #'string-to-number
|
||||||
(split-string version "\\.")))
|
(split-string version "\\."))))
|
||||||
|
;; Official releases are XX.YY, not XX.YY.ZZ
|
||||||
|
(if (= 2 (length ver-list))
|
||||||
|
(setq ver-list (append ver-list '(0))))
|
||||||
|
ver-list))
|
||||||
admin-android-version-code-regexp)
|
admin-android-version-code-regexp)
|
||||||
(set-version-in-file root "nt/README.W32" version
|
(set-version-in-file root "nt/README.W32" version
|
||||||
(rx (and "version" (1+ space)
|
(rx (and "version" (1+ space)
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue