Mercurial > emacs
comparison lisp/=inc-vers.el @ 5452:b328e9dec991
[ms-dos]: Save version.el as *binary*.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 06 Jan 1994 04:29:50 +0000 |
parents | e610eb2fbb5b |
children |
comparison
equal
deleted
inserted
replaced
5451:165b0bf0e879 | 5452:b328e9dec991 |
---|---|
42 | 42 |
43 | 43 |
44 (if (and (file-accessible-directory-p "../lisp/") | 44 (if (and (file-accessible-directory-p "../lisp/") |
45 (null (file-writable-p "../lisp/version.el"))) | 45 (null (file-writable-p "../lisp/version.el"))) |
46 (delete-file "../lisp/version.el")) | 46 (delete-file "../lisp/version.el")) |
47 (if (eq system-type 'ms-dos) (setq buffer-file-type t)) | |
47 (write-region (point-min) (point-max) "../lisp/version.el" nil 'nomsg) | 48 (write-region (point-min) (point-max) "../lisp/version.el" nil 'nomsg) |
48 (erase-buffer) | 49 (erase-buffer) |
49 (set-buffer-modified-p nil) | 50 (set-buffer-modified-p nil) |
50 | 51 |
51 (kill-emacs) | 52 (kill-emacs) |