diff options
Diffstat (limited to 'admin/admin.el')
| -rw-r--r-- | admin/admin.el | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/admin/admin.el b/admin/admin.el index 542556a65e0..7e761c3f1f4 100644 --- a/admin/admin.el +++ b/admin/admin.el | |||
| @@ -128,8 +128,13 @@ Root must be the root of an Emacs source tree." | |||
| 128 | (submatch (1+ (in "0-9.")))))) | 128 | (submatch (1+ (in "0-9.")))))) |
| 129 | (set-version-in-file root "java/AndroidManifest.xml.in" | 129 | (set-version-in-file root "java/AndroidManifest.xml.in" |
| 130 | (apply #'format "%02d%02d%02d000" | 130 | (apply #'format "%02d%02d%02d000" |
| 131 | (mapcar #'string-to-number | 131 | (let ((ver-list |
| 132 | (split-string version "\\."))) | 132 | (mapcar #'string-to-number |
| 133 | (split-string version "\\.")))) | ||
| 134 | ;; Official releases are XX.YY, not XX.YY.ZZ | ||
| 135 | (if (= 2 (length ver-list)) | ||
| 136 | (setq ver-list (append ver-list '(0)))) | ||
| 137 | ver-list)) | ||
| 133 | admin-android-version-code-regexp) | 138 | admin-android-version-code-regexp) |
| 134 | (set-version-in-file root "nt/README.W32" version | 139 | (set-version-in-file root "nt/README.W32" version |
| 135 | (rx (and "version" (1+ space) | 140 | (rx (and "version" (1+ space) |