From 9672f2c916b5909cc5836f67edc4d66842cce7cd Mon Sep 17 00:00:00 2001 From: Thien-Thi Nguyen Date: Fri, 30 Dec 2016 07:13:17 +0100 Subject: [PATCH] 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. --- admin/last-chance.el | 5 +++-- 1 file 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 ;; 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) -- 2.39.2