procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

last-chance: Also ignore NEWS files + typo fixes

Browse source 
* 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.
This commit is contained in:
Thien-Thi Nguyen 2016-12-30 07:13:17 +01:00
parent b5b4c4938b
commit 9672f2c916
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
admin/last-chance.el
View file

@ -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)