diff options
| author | Glenn Morris | 2019-04-29 09:08:19 -0700 |
|---|---|---|
| committer | Glenn Morris | 2019-04-29 09:08:19 -0700 |
| commit | 666293861985480bc658f9fa399009027bc39f1e (patch) | |
| tree | cbab6e4c77be3e5ee965b0e15b681b1030f2c3bb /admin | |
| parent | f1a3a7d6caeb3f250d338217dfd4c476e812bc6e (diff) | |
| parent | 0e8d452c1c166ff65a0325de23bc04b57aea68d8 (diff) | |
| download | emacs-666293861985480bc658f9fa399009027bc39f1e.tar.gz emacs-666293861985480bc658f9fa399009027bc39f1e.zip | |
Merge from origin/emacs-26
0e8d452 ; * doc/lispref/nonascii.texi (Coding System Basics): Fix gra...
25a2ff7 ; Add missing space in custom.texi
9ec18fb * admin/admin.el (set-version): Check for increase in version...
93912ba Be more careful about indent-sexp going over eol (Bug#35286)
Diffstat (limited to 'admin')
| -rw-r--r-- | admin/admin.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/admin/admin.el b/admin/admin.el index 030bd54b521..d3a477fde80 100644 --- a/admin/admin.el +++ b/admin/admin.el | |||
| @@ -138,10 +138,10 @@ Root must be the root of an Emacs source tree." | |||
| 138 | (if (eq 2 (length newversion)) 0 1)))) | 138 | (if (eq 2 (length newversion)) 0 1)))) |
| 139 | (majorbump (and oldversion (not (equal oldmajor newmajor)))) | 139 | (majorbump (and oldversion (not (equal oldmajor newmajor)))) |
| 140 | (minorbump (and oldversion (not majorbump) | 140 | (minorbump (and oldversion (not majorbump) |
| 141 | (or (not (equal (cadr oldversion) | 141 | (or (not (equal (cadr oldversion) (cadr newversion))) |
| 142 | (cadr newversion))) | 142 | ;; Eg 26.2 -> 26.2.50. |
| 143 | (and (equal (cadr oldversion) (cadr newversion)) | 143 | (and (> (length newversion) |
| 144 | (equal (nth 2 newversion) 50))))) | 144 | (length oldversion)))))) |
| 145 | (newsfile (expand-file-name "etc/NEWS" root)) | 145 | (newsfile (expand-file-name "etc/NEWS" root)) |
| 146 | (oldnewsfile (expand-file-name (format "etc/NEWS.%s" oldmajor) root))) | 146 | (oldnewsfile (expand-file-name (format "etc/NEWS.%s" oldmajor) root))) |
| 147 | (unless (> (length newversion) 2) ; pretest or release candidate? | 147 | (unless (> (length newversion) 2) ; pretest or release candidate? |