Lines Matching +defs:file +defs:type
1 ;;; rfn-eshadow.el --- Highlight `shadowed' part of read-file-name input text
9 ;; This file is part of GNU Emacs.
22 ;; along with GNU Emacs; see the file COPYING. If not, write to the
28 ;; Defines the mode `file-name-shadow-mode'.
30 ;; The `read-file-name' function passes its result through
31 ;; `substitute-in-file-name', so any part of the string preceding
35 ;; If `file-name-shadow-mode' is active, any part of the
37 ;; properties in `file-name-shadow-properties', which may
47 (defconst file-name-shadow-properties-custom-type
60 (face :value file-name-shadow))
97 (defcustom file-name-shadow-properties
98 '(face file-name-shadow field shadow)
100 Only used when `file-name-shadow-mode' is active.
102 `file-name-shadow-tty-properties' is used instead."
103 :type file-name-shadow-properties-custom-type
107 (defcustom file-name-shadow-tty-properties
110 Only used when `file-name-shadow-mode' is active and Emacs
112 system, `file-name-shadow-properties' is used instead."
113 :type file-name-shadow-properties-custom-type
117 (defface file-name-shadow
119 "Face used by `file-name-shadow-mode' for the shadow."
141 "Set up a minibuffer for `file-name-shadow-mode'.
143 (when minibuffer-completing-file-name
149 file-name-shadow-properties
150 file-name-shadow-tty-properties)))
163 (substitute-in-file-name
165 ;; `substitute-in-file-name' can fail on partial input.
172 `file-name-shadow-mode'; the minibuffer should have already
175 (let ((goal (substitute-in-file-name (minibuffer-contents)))
200 ;; `substitute-in-file-name' can fail on partial input.
204 (define-minor-mode file-name-shadow-mode
208 `substitute-in-file-name') is given the properties in
209 `file-name-shadow-properties', which can be used to make
218 (if file-name-shadow-mode