Lines Matching +defs:mode +defs:name
28 ;; Defines a file-name-handler hook that transforms visited (or
32 ;; resulting buffer file is saved to another name it will correctly save
41 (defcustom image-file-name-extensions
45 in addition to those matching `image-file-name-regexps'.
47 See `auto-image-file-mode'; if `auto-image-file-mode' is enabled,
49 `auto-image-file-mode' is re-enabled; this happens automatically when
54 (when auto-image-file-mode
56 (auto-image-file-mode t)))
61 (defcustom image-file-name-regexps nil
64 in addition to those with an extension in `image-file-name-extensions'.
66 See function `auto-image-file-mode'; if `auto-image-file-mode' is
68 `auto-image-file-mode' is re-enabled; this happens automatically when
73 (when auto-image-file-mode
75 (auto-image-file-mode t)))
81 (defun image-file-name-regexp ()
84 (and image-file-name-extensions
87 image-file-name-extensions)
88 image-file-name-extensions)
91 (if image-file-name-regexps
94 (cons exts-regexp image-file-name-regexps)
95 image-file-name-regexps)
164 See `file-name-handler-alist' for details."
166 auto-image-file-mode)
174 (let ((inhibit-file-name-handlers
176 (and (eq inhibit-file-name-operation operation)
177 inhibit-file-name-handlers)))
178 (inhibit-file-name-operation operation))
183 (define-minor-mode auto-image-file-mode
188 Image files are those whose name has an extension in
189 `image-file-name-extensions', or matches a regexp in
190 `image-file-name-regexps'."
195 (rassq 'image-file-handler file-name-handler-alist)))
197 (setq file-name-handler-alist
198 (delq existing-entry file-name-handler-alist))))
200 (when auto-image-file-mode
201 (push (cons (image-file-name-regexp) 'image-file-handler)
202 file-name-handler-alist)))