comparison lisp/ido.el @ 90140:02f1dbc4a199

Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-35 Merge from emacs--cvs-trunk--0 Patches applied: * emacs--cvs-trunk--0 (patch 228-240) - Update from CVS - Merge from gnus--rel--5.10 * gnus--rel--5.10 (patch 53-58) - Merge from emacs--cvs-trunk--0 - Update from CVS - Collapse feature addition/removal within single ChangeLog entry
author Miles Bader <miles@gnu.org>
date Sat, 09 Apr 2005 02:16:29 +0000
parents 7a3341d65a12 31aa9a390538
children 08185296b491
comparison
equal deleted inserted replaced
90139:e0d294b9b23e 90140:02f1dbc4a199
1 ;;; ido.el --- interactively do things with buffers and files. 1 ;;; ido.el --- interactively do things with buffers and files.
2 2
3 ;; Copyright (C) 1996-2004 Free Software Foundation, Inc. 3 ;; Copyright (C) 1996-2004, 2005 Free Software Foundation, Inc.
4 4
5 ;; Author: Kim F. Storm <storm@cua.dk> 5 ;; Author: Kim F. Storm <storm@cua.dk>
6 ;; Based on: iswitchb by Stephen Eglen <stephen@cns.ed.ac.uk> 6 ;; Based on: iswitchb by Stephen Eglen <stephen@cns.ed.ac.uk>
7 ;; Keywords: extensions convenience 7 ;; Keywords: extensions convenience
8 8
745 (:foreground "ForestGreen")) 745 (:foreground "ForestGreen"))
746 (t (:italic t))) 746 (t (:italic t)))
747 "*Font used by ido for highlighting only match." 747 "*Font used by ido for highlighting only match."
748 :group 'ido) 748 :group 'ido)
749 749
750 (defface ido-subdir-face '((((class color)) 750 (defface ido-subdir-face '((((min-colors 88) (class color))
751 (:foreground "red1"))
752 (((class color))
751 (:foreground "red")) 753 (:foreground "red"))
752 (t (:underline t))) 754 (t (:underline t)))
753 "*Font used by ido for highlighting subdirs in the alternatives." 755 "*Font used by ido for highlighting subdirs in the alternatives."
754 :group 'ido) 756 :group 'ido)
755 757
756 (defface ido-indicator-face '((((class color)) 758 (defface ido-indicator-face '((((min-colors 88) (class color))
759 (:foreground "yellow1"
760 :background "red1"
761 :width condensed))
762 (((class color))
757 (:foreground "yellow" 763 (:foreground "yellow"
758 :background "red" 764 :background "red"
759 :width condensed)) 765 :width condensed))
760 (t (:inverse-video t))) 766 (t (:inverse-video t)))
761 "*Font used by ido for highlighting its indicators." 767 "*Font used by ido for highlighting its indicators."