diff options
| author | Glenn Morris | 2019-09-01 14:35:31 -0700 |
|---|---|---|
| committer | Glenn Morris | 2019-09-01 14:35:31 -0700 |
| commit | dd162a3f2264940e3e329d0bfb195f56d00ed08f (patch) | |
| tree | 9c63b240814603b5853c7e1c894b9ffdc8eac8f1 /admin/admin.el | |
| parent | ba12c5467dadd228a00bcf972fd8415c26f4a4bd (diff) | |
| download | emacs-dd162a3f2264940e3e329d0bfb195f56d00ed08f.tar.gz emacs-dd162a3f2264940e3e329d0bfb195f56d00ed08f.zip | |
* admin/admin.el (set-version): Check for empty NEWS sections.
Diffstat (limited to 'admin/admin.el')
| -rw-r--r-- | admin/admin.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/admin/admin.el b/admin/admin.el index d3a477fde80..5968e32b05e 100644 --- a/admin/admin.el +++ b/admin/admin.el | |||
| @@ -147,6 +147,10 @@ Root must be the root of an Emacs source tree." | |||
| 147 | (unless (> (length newversion) 2) ; pretest or release candidate? | 147 | (unless (> (length newversion) 2) ; pretest or release candidate? |
| 148 | (with-temp-buffer | 148 | (with-temp-buffer |
| 149 | (insert-file-contents newsfile) | 149 | (insert-file-contents newsfile) |
| 150 | (when (re-search-forward "^\\* [^\n]*\n+ " nil t) | ||
| 151 | (display-warning 'admin | ||
| 152 | "NEWS file contains empty sections - remove them?")) | ||
| 153 | (goto-char (point-min)) | ||
| 150 | (if (re-search-forward "^\\(\\+\\+\\+ *\\|--- *\\)$" nil t) | 154 | (if (re-search-forward "^\\(\\+\\+\\+ *\\|--- *\\)$" nil t) |
| 151 | (display-warning 'admin | 155 | (display-warning 'admin |
| 152 | "NEWS file still contains temporary markup. | 156 | "NEWS file still contains temporary markup. |