diff options
author | Richard M. Stallman <rms@gnu.org> | 1995-06-16 01:24:43 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1995-06-16 01:24:43 +0000 |
commit | 87c543184c9b98ff2f53171dc19bd3593cf70e82 (patch) | |
tree | 3ae44d9e608754a65531b8a6985929eee14d264a /lisp/dos-fns.el | |
parent | 8e448f3ff019607b4e71db80a10dca602eda44e8 (diff) | |
download | emacs-87c543184c9b98ff2f53171dc19bd3593cf70e82.tar.gz |
(path-separator, grep-null-device, grep-regexp-alist):
Set them, as in winnt.el.
Diffstat (limited to 'lisp/dos-fns.el')
-rw-r--r-- | lisp/dos-fns.el | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/lisp/dos-fns.el b/lisp/dos-fns.el index 39cbbf2f129..83918c88da6 100644 --- a/lisp/dos-fns.el +++ b/lisp/dos-fns.el @@ -42,6 +42,16 @@ (purecopy '(-3 . "%p")) (purecopy "-%-"))) +;; Use ";" instead of ":" as a path separator (from files.el). +(setq path-separator ";") + +;; Set the null device (for compile.el). +(setq grep-null-device "NUL") + +;; Set the grep regexp to match entries with drive letters. +(setq grep-regexp-alist + '(("^\\(\\([a-zA-Z]:\\)?[^:( \t\n]+\\)[:( \t]+\\([0-9]+\\)[:) \t]" 1 3))) + (defvar file-name-buffer-file-type-alist '( ("[:/].*config.sys$" . nil) ; config.sys text |