gnu-emacs-sources
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

minicolor.el --- place a face on the minibuffer prompt


From: Kevin A. Burton - burtonator
Subject: minicolor.el --- place a face on the minibuffer prompt
Date: 17 Dec 2001 17:53:24 -0800
User-agent: Gnus/5.0808 (Gnus v5.8.8) Emacs/21.1.50

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1


See the commentary.

;;; minicolor.el --- place a face on the minibuffer prompt

;; $Id: $

;; Copyright (C) 2000-2003 Free Software Foundation, Inc.
;; Copyright (C) 2000-2003 Kevin A. Burton (address@hidden)

;; Author: Kevin A. Burton (address@hidden)
;; Maintainer: Kevin A. Burton (address@hidden)
;; Location: http://relativity.yi.org
;; Keywords: 
;; Version: 1.0.0

;; This file is [not yet] part of GNU Emacs.

;; This program is free software; you can redistribute it and/or modify it under
;; the terms of the GNU General Public License as published by the Free Software
;; Foundation; either version 2 of the License, or any later version.
;;
;; This program is distributed in the hope that it will be useful, but WITHOUT
;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
;; FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
;; details.
;;
;; You should have received a copy of the GNU General Public License along with
;; this program; if not, write to the Free Software Foundation, Inc., 59 Temple
;; Place - Suite 330, Boston, MA 02111-1307, USA.

;;; Commentary:

;; Basically this is a small Emacs lisp package that allows your prompt to have
;; color.  So if your prompt says:
;;
;; Find file: /tmp/test.txt
;;
;; The words "Find file: " will be displayed with minibuffer-face.
;;
;; You can then customize minibuffer-face to meet your needs.
;;
;; This is MUCH better on the eyes after a long day of hacking .

;; This is only for Emacs 21.

;; If you enjoy this software, please consider a donation to the EFF
;; (http://www.eff.org)

;;; Code:

(defface minibuffer-face '((t (:bold t :foreground "yellow")))
  "Face used to color the minibuffer.")

;;The default minibuffer-prompt-properties should look something like this.
;;(setq minibuffer-prompt-properties '(read-only t point-entered 
minibuffer-avoid-prompt))

(setq minibuffer-prompt-properties (append minibuffer-prompt-properties
                                           (list 'face 'minibuffer-face)))

(provide 'minicolor)

;;; minicolor.el ends here

- -- 
Kevin A. Burton ( address@hidden, address@hidden, address@hidden )
             Location - San Francisco, CA, Cell - 415.595.9965
        Jabber - address@hidden,  Web - http://relativity.yi.org/

Never apply a Star Trek solution to a Babylon 5 problem.

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.0.6 (GNU/Linux)
Comment: Get my public key at: http://relativity.yi.org/pgpkey.txt

iD8DBQE8HqGUAwM6xb2dfE0RAveSAJ9MXe30sISLD1KKRgYktn61NST3uwCgmw0j
SqwdyPmOfxNRlVc50Tt9dmY=
=MYF+
-----END PGP SIGNATURE-----



reply via email to

[Prev in Thread] Current Thread [Next in Thread]