cgit.sxemacs.org Git - packages/blob - xemacs-packages/patcher/lisp/patcher-face.el

   1 ;;; patcher-face.el --- Face definitions
   2
   3 ;; Copyright (C) 2010 Didier Verna
   4
   5 ;; Author:        Didier Verna <didier@lrde.epita.fr>
   6 ;; Maintainer:    Didier Verna <didier@lrde.epita.fr>
   7 ;; Created:       Tue Apr  6 15:44:31 2010
   8 ;; Last Revision: Sun May 30 18:28:16 2010
   9 ;; Keywords:      maint
  10
  11
  12 ;; This file is part of Patcher.
  13
  14 ;; Patcher is free software; you can redistribute it and/or modify
  15 ;; it under the terms of the GNU General Public License version 3,
  16 ;; as published by the Free Software Foundation.
  17
  18 ;; Patcher is distributed in the hope that it will be useful,
  19 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  20 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21 ;; GNU General Public License for more details.
  22
  23 ;; You should have received a copy of the GNU General Public License
  24 ;; along with this program; if not, write to the Free Software
  25 ;; Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  26
  27
  28 ;;; Commentary:
  29
  30 ;; Contents management by FCM version 0.1.
  31
  32
  33 ;;; Code:
  34
  35 (require 'cl)
  36
  37 (eval-when-compile (require 'patcher-cutil))
  38 (require 'patcher-util)
  39
  40
  41 (defgroup patcher-face nil
  42   "Patcher settings for faces."
  43   :group 'patcher)
  44
  45 (defface patcher-comment-face '((t (:inherit font-lock-comment-face)))
  46   "*Face used for comments in log message and commit command buffers."
  47   :group 'patcher-face)
  48
  49 (defface patcher-reference-face '((t (:inherit font-lock-reference-face)))
  50   "*Face used for references in log message and commit command buffers."
  51   :group 'patcher-face)
  52
  53
  54 (provide 'patcher-face)
  55
  56 ;;; patcher-face.el ends here