Mercurial > emacs
comparison lisp/dos-w32.el @ 38001:183d350bb9d2
(grep-regexp-alist): Remove definition, since the
general one on compile.el supports drive letters.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Fri, 08 Jun 2001 10:52:37 +0000 |
| parents | a47622945cee |
| children | 7864bcf48126 |
comparison
equal
deleted
inserted
replaced
| 38000:32f9ff5c1d5b | 38001:183d350bb9d2 |
|---|---|
| 35 (setq minibuffer-history-case-insensitive-variables | 35 (setq minibuffer-history-case-insensitive-variables |
| 36 (cons 'file-name-history minibuffer-history-case-insensitive-variables)) | 36 (cons 'file-name-history minibuffer-history-case-insensitive-variables)) |
| 37 | 37 |
| 38 ;; Set the null device (for compile.el). | 38 ;; Set the null device (for compile.el). |
| 39 (setq null-device "NUL") | 39 (setq null-device "NUL") |
| 40 | |
| 41 ;; Set the grep regexp to match entries with drive letters. | |
| 42 (setq grep-regexp-alist | |
| 43 '(("^\\(\\([a-zA-Z]:\\)?[^:( \t\n]+\\)[:( \t]+\\([0-9]+\\)[:) \t]" 1 3))) | |
| 44 | 40 |
| 45 ;; For distinguishing file types based upon suffixes. | 41 ;; For distinguishing file types based upon suffixes. |
| 46 (defvar file-name-buffer-file-type-alist | 42 (defvar file-name-buffer-file-type-alist |
| 47 '( | 43 '( |
| 48 ("[:/].*config.sys$" . nil) ; config.sys text | 44 ("[:/].*config.sys$" . nil) ; config.sys text |