summaryrefslogtreecommitdiff
path: root/admin/last-chance.el
diff options
context:
space:
mode:
authorThien-Thi Nguyen <ttn@gnu.org>2016-12-30 07:13:17 +0100
committerThien-Thi Nguyen <ttn@gnu.org>2016-12-30 07:15:10 +0100
commit9672f2c916b5909cc5836f67edc4d66842cce7cd (patch)
tree960d724d0ec0178b3d5af8524616453478c9fbcc /admin/last-chance.el
parentb5b4c4938bcd710ab857505e04424fca39a13624 (diff)
downloademacs-9672f2c916b5909cc5836f67edc4d66842cce7cd.tar.gz
last-chance: Also ignore NEWS files + typo fixes
* admin/last-chance.el: Fix typo in copyright notice. (last-chance-uninteresting-regexps): Add entry to match NEWS files. (last-chance-cleanup): Fix typo in docstring.
Diffstat (limited to 'admin/last-chance.el')
-rw-r--r--admin/last-chance.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/admin/last-chance.el b/admin/last-chance.el
index 5151a7562dd..02df7dea81b 100644
--- a/admin/last-chance.el
+++ b/admin/last-chance.el
@@ -1,6 +1,6 @@
;;; last-chance.el --- dangling deterrence -*- lexical-binding: t; -*-
-;; Copyright (C) 2000-2016 Free Software Foundation, Inc.
+;; Copyright (C) 2016 Free Software Foundation, Inc.
;; Author: Thien-Thi Nguyen <ttn@gnu.org>
;; Maintainer: emacs-devel@gnu.org
@@ -58,6 +58,7 @@ This should include -n, -H, -F.")
(defvar last-chance-uninteresting-regexps
'("ChangeLog[.0-9]*:"
+ "NEWS[-.0-9]*:"
;; Add more ‘flush-lines’ args here.
)
"List of regexps that match uninteresting \"git grep\" hits.")
@@ -67,7 +68,7 @@ This should include -n, -H, -F.")
(defun last-chance-cleanup (buffer status)
"Filter lines in BUFFER; append STATUS and count of removed lines.
-If BUFFER is not seem to be one created by ‘last-chance’, do nothing.
+If BUFFER does not seem to be one created by ‘last-chance’, do nothing.
This function is intended to be added to ‘compilation-finish-functions’."
(let ((name (buffer-local-value 'last-chance-symbol buffer))
bef aft)