jeremy/elisp
1
Fork 0
Code Releases Activity

erc-highlight-nicknames.el: improve heading

Browse source
This commit is contained in:
Jeremy Baxter 2024-07-18 19:20:33 +12:00
parent eb4890e786
commit 076626a7f4
1 changed files with 36 additions and 40 deletions
Download patch file Download diff file Expand all files Collapse all files

76
erc-highlight-nicknames.el
View file

@ -1,64 +1,62 @@
;;; erc-highlight-nicknames.el ;;; erc-highlight-nicknames.el --- highlight nicknames in ERC -*- lexical-binding:t -*-
;;; Nickname highlighting for ERC that respects your colourscheme
;; Copyright (C) 2007 André Riemann ;; Copyright (C) 2007 André Riemann
;; Copyright (C) 2008 ~ 2014 Andy Stewart ;; Copyright (C) 2008-2014 Andy Stewart
;; Copyright (C) 2023 Jeremy Baxter
;; Author: André Riemann <andre.riemann@web.de> ;; Author: André Riemann <andre.riemann@web.de>
;; Maintainer: Andy Stewart <lazycat.manatee@gmail.com> ;; Maintainer: Jeremy Baxter <jeremy@baxters.nz>
;; Created: 2007-09-25 ;; Created: 2007-09-25
;; Keywords: comm, faces ;; Keywords: comm, faces
;; URL: http://www.emacswiki.org/cgi-bin/wiki/ErcHighlightNicknames ;; This file is not part of GNU Emacs.
;; Compatibility: tested with
;; * GNU Emacs 23.0 (Erc 5.2, 5.3)
;; * XEmacs 21.4 (Erc 5.1) (briefly)
;; Version: 0.4.1
;; Last-Updated: 2014-05-09 13:18:40
;; By: Andy Stewart
;; This file is free software; you can redistribute it and/or modify ;; erc-highlight-nicknames.el is free software: you can redistribute it
;; it under the terms of the GNU General Public License as published by ;; and/or modify it under the terms of the GNU General Public License as
;; the Free Software Foundation; either version 2, or (at your option) ;; published by the Free Software Foundation, either version 3 of the
;; any later version. ;; License, or (at your option) any later version.
;;
;; This file is distributed in the hope that it will be useful, but ;; erc-highlight-nicknames.el is distributed in the hope that it will be
;; WITHOUT ANY WARRANTY; without even the implied warranty of ;; useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
;; General Public License for more details. ;; General Public License for more details.
;;
;; You should have received a copy of the GNU General Public License ;; You should have received a copy of the GNU General Public License
;; along with GNU Emacs; see the file COPYING. If not, write to the Free ;; along with erc-highlight-nicknames.el. If not, see
;; Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, ;; <https://www.gnu.org/licenses/>.
;; MA 02110-1301, USA.
;;; Commentary: ;;; Commentary:
;; To activate this module, put this in your init file
;; This is a modified version of erc-highlight-nicknames.el from
;; <https://emacswiki.org/emacs/erc-highlight-nicknames.el>. It has been
;; extended to use the configured ERC colour palette, using the faces
;; with names beginning with `fg:erc-color-face'.
;;
;; Press: M-x customize-group RET erc-faces
;; for a list of these faces.
;; Originally authored by André Riemann in 2007 and updated from 2008-2014
;; by Andy Stewart. ERC face support was added by Jeremy Baxter in 2023.
;; To use erc-highlight-nicknames.el, put this in your init file:
;;
;; (require 'erc-highlight-nicknames) ;; (require 'erc-highlight-nicknames)
;; and add highlight-nicknames to `erc-modules' by customizing it. ;; (add-to-list 'erc-modules 'highlight-nicknames)
;; (erc-update-modules)
;; Or put this in your init file ;; Press: M-x customize-face RET erc-highlight-nick-base-face RET
;; (and
;; (load-library "erc-highlight-nicknames")
;; (add-to-list 'erc-modules 'highlight-nicknames)
;; (erc-update-modules))
;; Press
;; M-x customize-face RET erc-highlight-nick-base-face RET
;; to customize the face that will be added before the color, if you want ;; to customize the face that will be added before the color, if you want
;; for example all the nicks underlined. ;; for example all the nicks underlined.
;;; Change Log: ;;; Change Log:
;; 2023/10/07 ;; 2023-10-07 Jeremy Baxter
;; * Randomly pick a face out of a list of erc foreground faces ;; * Randomly pick a face out of a list of erc foreground faces
;; and use that to determine a user's nick face. This way ;; and use that to determine a user's nick face. This way
;; the possible nick colours can be customised by pressing ;; the possible nick colours can be customised by pressing
;; M-x customize-apropos-faces RET erc RET. ;; M-x customize-apropos-faces RET erc RET.
;; ;; 2014-05-09
;; 2014/05/09
;; * Fixed `buffer-substring-no-properties' error with Emacs 24.4.50 ;; * Fixed `buffer-substring-no-properties' error with Emacs 24.4.50
;;
;; 2008-12-07 Andy Stewart ;; 2008-12-07 Andy Stewart
;; * There was a bug that function `erc-highlight-nicknames' created ;; * There was a bug that function `erc-highlight-nicknames' created
;; many faces for the same nickname. It would create a new one when ;; many faces for the same nickname. It would create a new one when
@ -83,9 +81,7 @@
;; from another face (hopefully it still works with XEmacs) ;; from another face (hopefully it still works with XEmacs)
;; * for that purpose created a new, customizable face ;; * for that purpose created a new, customizable face
;; 2007-09-25 andre-r ;; 2007-09-25 andre-r
;; * inital release ;; * initial release
;; This file is *NOT* part of GNU Emacs.
;;; Code: ;;; Code: