diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-07-21 22:16:11 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-07-21 22:16:11 +0000 |
| commit | 39347eea804632a99b8e9d695adef83bfbfbf9ae (patch) | |
| tree | e3ca434e8899046af7410aa9623790de3a534204 /lisp/=inc-vers.el | |
| parent | f8d2327be4d96866e344e86ca1626ae8f6a4174b (diff) | |
| download | emacs-39347eea804632a99b8e9d695adef83bfbfbf9ae.tar.gz | |
Try deleting version.el if it's not writable.
Diffstat (limited to 'lisp/=inc-vers.el')
| -rw-r--r-- | lisp/=inc-vers.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/=inc-vers.el b/lisp/=inc-vers.el index 008811f54cf..6523dafd21b 100644 --- a/lisp/=inc-vers.el +++ b/lisp/=inc-vers.el @@ -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) |