Revert "tangled files should not be writable"
This reverts commit 5e3b8259c7
.
This commit is contained in:
parent
457c27d05b
commit
458824493d
|
@ -264,12 +264,8 @@ exported source code blocks by language."
|
|||
(goto-char (point-max))
|
||||
(insert content)
|
||||
(write-region nil nil file-name))))
|
||||
(set-file-modes
|
||||
file-name
|
||||
;; never writable (don't accidentally edit tangled files)
|
||||
(if she-bang
|
||||
#o555 ;; files with she-bangs should be executable
|
||||
#o444)) ;; those without should not
|
||||
;; if files contain she-bangs, then make the executable
|
||||
(when she-bang (set-file-modes file-name #o755))
|
||||
;; update counter
|
||||
(setq block-counter (+ 1 block-counter))
|
||||
(add-to-list 'path-collector file-name)))))
|
||||
|
|
Loading…
Reference in New Issue