On 5/12/22 09:55, Max Nikulin wrote:
+ (unless (file-exists-p file)
+ (error "File to tangle does not exist: %s" file))
+ (when (file-newer-than-file-p file tangled-file)
(org-babel-tangle-file file ...
file-newer-than-file-p succeeds only if FILE exists, so in that case
it'd be a bit more efficient to avoid testing FILE's existence again, e.g.:
(cond
((file-newer-than-file-p file tangled-file)
(org-bable-tangle-file file ...))
((not (file-exists-p file))
(error "File to tangle does not exist: %s" file)))