[WINDOWSNT]: Find doc strings

diff --git a/lisp/loadup.el b/lisp/loadup.el
index a4f74d982ef658e11f54ce87b3c6209bc5208ee2..efa7816bf2fb0a6d1fe5813ceac627b76daf41b6 100644 (file)
--- 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)))