X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/33017fafd17d722e82a268e9b272f27df261e09d..43f52995ea9d4846c84f81d64107314a6577e595:/lisp/erc/erc-goodies.el diff --git a/lisp/erc/erc-goodies.el b/lisp/erc/erc-goodies.el index acff76beb1..8bb6e77a5f 100644 --- a/lisp/erc/erc-goodies.el +++ b/lisp/erc/erc-goodies.el @@ -1,8 +1,9 @@ ;; erc-goodies.el --- Collection of ERC modules -;; Copyright (C) 2001-2012 Free Software Foundation, Inc. +;; Copyright (C) 2001-2014 Free Software Foundation, Inc. ;; Author: Jorgen Schaefer +;; Maintainer: emacs-devel@gnu.org ;; Most code is taken verbatim from erc.el, see there for the original ;; authors. @@ -206,112 +207,114 @@ The value `erc-interpret-controls-p' must also be t for this to work." :group 'erc-control-characters :type 'boolean) -(defface erc-bold-face '((t (:bold t))) +(defface erc-bold-face '((t :weight bold)) "ERC bold face." :group 'erc-faces) + (defface erc-inverse-face - '((t (:foreground "White" :background "Black"))) + '((t :foreground "White" :background "Black")) "ERC inverse face." :group 'erc-faces) -(defface erc-underline-face '((t (:underline t))) + +(defface erc-underline-face '((t :underline t)) "ERC underline face." :group 'erc-faces) -(defface fg:erc-color-face0 '((t (:foreground "White"))) +(defface fg:erc-color-face0 '((t :foreground "White")) "ERC face." :group 'erc-faces) -(defface fg:erc-color-face1 '((t (:foreground "black"))) +(defface fg:erc-color-face1 '((t :foreground "black")) "ERC face." :group 'erc-faces) -(defface fg:erc-color-face2 '((t (:foreground "blue4"))) +(defface fg:erc-color-face2 '((t :foreground "blue4")) "ERC face." :group 'erc-faces) -(defface fg:erc-color-face3 '((t (:foreground "green4"))) +(defface fg:erc-color-face3 '((t :foreground "green4")) "ERC face." :group 'erc-faces) -(defface fg:erc-color-face4 '((t (:foreground "red"))) +(defface fg:erc-color-face4 '((t :foreground "red")) "ERC face." :group 'erc-faces) -(defface fg:erc-color-face5 '((t (:foreground "brown"))) +(defface fg:erc-color-face5 '((t :foreground "brown")) "ERC face." :group 'erc-faces) -(defface fg:erc-color-face6 '((t (:foreground "purple"))) +(defface fg:erc-color-face6 '((t :foreground "purple")) "ERC face." :group 'erc-faces) -(defface fg:erc-color-face7 '((t (:foreground "orange"))) +(defface fg:erc-color-face7 '((t :foreground "orange")) "ERC face." :group 'erc-faces) -(defface fg:erc-color-face8 '((t (:foreground "yellow"))) +(defface fg:erc-color-face8 '((t :foreground "yellow")) "ERC face." :group 'erc-faces) -(defface fg:erc-color-face9 '((t (:foreground "green"))) +(defface fg:erc-color-face9 '((t :foreground "green")) "ERC face." :group 'erc-faces) -(defface fg:erc-color-face10 '((t (:foreground "lightblue1"))) +(defface fg:erc-color-face10 '((t :foreground "lightblue1")) "ERC face." :group 'erc-faces) -(defface fg:erc-color-face11 '((t (:foreground "cyan"))) +(defface fg:erc-color-face11 '((t :foreground "cyan")) "ERC face." :group 'erc-faces) -(defface fg:erc-color-face12 '((t (:foreground "blue"))) +(defface fg:erc-color-face12 '((t :foreground "blue")) "ERC face." :group 'erc-faces) -(defface fg:erc-color-face13 '((t (:foreground "deeppink"))) +(defface fg:erc-color-face13 '((t :foreground "deeppink")) "ERC face." :group 'erc-faces) -(defface fg:erc-color-face14 '((t (:foreground "gray50"))) +(defface fg:erc-color-face14 '((t :foreground "gray50")) "ERC face." :group 'erc-faces) -(defface fg:erc-color-face15 '((t (:foreground "gray90"))) +(defface fg:erc-color-face15 '((t :foreground "gray90")) "ERC face." :group 'erc-faces) -(defface bg:erc-color-face0 '((t (:background "White"))) +(defface bg:erc-color-face0 '((t :background "White")) "ERC face." :group 'erc-faces) -(defface bg:erc-color-face1 '((t (:background "black"))) +(defface bg:erc-color-face1 '((t :background "black")) "ERC face." :group 'erc-faces) -(defface bg:erc-color-face2 '((t (:background "blue4"))) +(defface bg:erc-color-face2 '((t :background "blue4")) "ERC face." :group 'erc-faces) -(defface bg:erc-color-face3 '((t (:background "green4"))) +(defface bg:erc-color-face3 '((t :background "green4")) "ERC face." :group 'erc-faces) -(defface bg:erc-color-face4 '((t (:background "red"))) +(defface bg:erc-color-face4 '((t :background "red")) "ERC face." :group 'erc-faces) -(defface bg:erc-color-face5 '((t (:background "brown"))) +(defface bg:erc-color-face5 '((t :background "brown")) "ERC face." :group 'erc-faces) -(defface bg:erc-color-face6 '((t (:background "purple"))) +(defface bg:erc-color-face6 '((t :background "purple")) "ERC face." :group 'erc-faces) -(defface bg:erc-color-face7 '((t (:background "orange"))) +(defface bg:erc-color-face7 '((t :background "orange")) "ERC face." :group 'erc-faces) -(defface bg:erc-color-face8 '((t (:background "yellow"))) +(defface bg:erc-color-face8 '((t :background "yellow")) "ERC face." :group 'erc-faces) -(defface bg:erc-color-face9 '((t (:background "green"))) +(defface bg:erc-color-face9 '((t :background "green")) "ERC face." :group 'erc-faces) -(defface bg:erc-color-face10 '((t (:background "lightblue1"))) +(defface bg:erc-color-face10 '((t :background "lightblue1")) "ERC face." :group 'erc-faces) -(defface bg:erc-color-face11 '((t (:background "cyan"))) +(defface bg:erc-color-face11 '((t :background "cyan")) "ERC face." :group 'erc-faces) -(defface bg:erc-color-face12 '((t (:background "blue"))) +(defface bg:erc-color-face12 '((t :background "blue")) "ERC face." :group 'erc-faces) -(defface bg:erc-color-face13 '((t (:background "deeppink"))) +(defface bg:erc-color-face13 '((t :background "deeppink")) "ERC face." :group 'erc-faces) -(defface bg:erc-color-face14 '((t (:background "gray50"))) +(defface bg:erc-color-face14 '((t :background "gray50")) "ERC face." :group 'erc-faces) -(defface bg:erc-color-face15 '((t (:background "gray90"))) +(defface bg:erc-color-face15 '((t :background "gray90")) "ERC face." :group 'erc-faces)