diff options
| author | Karl Heuer <kwzh@gnu.org> | 1995-04-12 03:11:40 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1995-04-12 03:11:40 +0000 |
| commit | d74c6f5b5c4aee035854e569bff73b7f54d82b2c (patch) | |
| tree | cfa93da411f89625b6137d41ac87f79500ba94ad /lisp/loadup.el | |
| parent | 028f7bedbcbe023227321e283ab3b506f32d59d6 (diff) | |
| download | emacs-d74c6f5b5c4aee035854e569bff73b7f54d82b2c.tar.gz | |
[WINDOWSNT]: Find doc strings
Diffstat (limited to 'lisp/loadup.el')
| -rw-r--r-- | lisp/loadup.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/loadup.el b/lisp/loadup.el index a4f74d982ef..efa7816bf2f 100644 --- a/lisp/loadup.el +++ b/lisp/loadup.el @@ -215,7 +215,7 @@ (dump-emacs "emacs" "temacs") (message "%d pure bytes used" pure-bytes-used) ;; Recompute NAME now, so that it isn't set when we dump. - (if (not (eq system-type 'ms-dos)) + (if (not (memq system-type '(ms-dos windows-nt))) (let ((name (concat "emacs-" emacs-version))) (while (string-match "[^-+_.a-zA-Z0-9]+" name) (setq name (concat (downcase (substring name 0 (match-beginning 0))) |