changeset 11398:2fdc054fa4e3

[WINDOWSNT]: Find doc strings
author Karl Heuer <kwzh@gnu.org>
date Wed, 12 Apr 1995 03:11:40 +0000
parents eba8070796a4
children f322675d5c53
files lisp/loadup.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/loadup.el	Wed Apr 12 03:10:46 1995 +0000
+++ b/lisp/loadup.el	Wed Apr 12 03:11:40 1995 +0000
@@ -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)))