changeset 4209:e610eb2fbb5b

Try deleting version.el if it's not writable.
author Richard M. Stallman <rms@gnu.org>
date Wed, 21 Jul 1993 22:16:11 +0000
parents bdcdbc742efe
children b0a5f72de90c
files lisp/=inc-vers.el
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/=inc-vers.el	Wed Jul 21 22:12:08 1993 +0000
+++ b/lisp/=inc-vers.el	Wed Jul 21 22:16:11 1993 +0000
@@ -41,6 +41,9 @@
 			   (progn (skip-chars-forward "^\"") (point))))
 
 
+(if (and (file-accessible-directory-p "../lisp/")
+	 (null (file-writable-p "../lisp/version.el")))
+    (delete-file "../lisp/version.el"))
 (write-region (point-min) (point-max) "../lisp/version.el" nil 'nomsg)
 (erase-buffer)
 (set-buffer-modified-p nil)