(byte-compile-file): Treat windows-nt like ms-dos.
This commit is contained in:
parent
23fa904007
commit
2cd0169dc8
1 changed files with 1 additions and 1 deletions
|
@ -1181,7 +1181,7 @@ With prefix arg (noninteractively: 2nd arg), load the file after compiling."
|
|||
;;; (error nil)))
|
||||
(if (file-writable-p target-file)
|
||||
(let ((kanji-flag nil)) ; for nemacs, from Nakagawa Takayuki
|
||||
(if (eq system-type 'ms-dos)
|
||||
(if (or (eq system-type 'ms-dos) (eq system-type 'windows-nt))
|
||||
(setq buffer-file-type t))
|
||||
(write-region 1 (point-max) target-file))
|
||||
;; This is just to give a better error message than
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue