Update comment about _XOPEN_SOURCE.

[bpt/emacs.git] / lisp / inc-vers.el

diff --git a/lisp/inc-vers.el b/lisp/inc-vers.el
index 1eed7b3..0a4a43f 100644 (file)
--- a/lisp/inc-vers.el
+++ b/lisp/inc-vers.el
@@ -2,11 +2,14 @@
 
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
+;; Maintainer: FSF
+;; Keywords: internal
+
 ;; This file is part of GNU Emacs.
 
 ;; GNU Emacs is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 1, or (at your option)
+;; the Free Software Foundation; either version 2, or (at your option)
 ;; any later version.
 
 ;; GNU Emacs is distributed in the hope that it will be useful,
@@ -18,6 +21,7 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
+;;; Code:
 
 (insert-file-contents "../lisp/version.el")
 
@@ -37,6 +41,10 @@
                           (progn (skip-chars-forward "^\"") (point))))
 
 
+(if (and (file-accessible-directory-p "../lisp/")
+        (null (file-writable-p "../lisp/version.el")))
+    (delete-file "../lisp/version.el"))
+(if (eq system-type 'ms-dos) (setq buffer-file-type t))
 (write-region (point-min) (point-max) "../lisp/version.el" nil 'nomsg)
 (erase-buffer)
 (set-buffer-modified-p nil)