mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-09-29 22:07:49 +00:00
Merge branch 'maint'
This commit is contained in:
commit
fb3ec41dac
|
@ -218,12 +218,12 @@ and then loads the resulting file using `load-file'. With
|
||||||
optional prefix argument COMPILE, the tangled Emacs Lisp file is
|
optional prefix argument COMPILE, the tangled Emacs Lisp file is
|
||||||
byte-compiled before it is loaded."
|
byte-compiled before it is loaded."
|
||||||
(interactive "fFile to load: \nP")
|
(interactive "fFile to load: \nP")
|
||||||
(let* ((file (file-truename file))
|
(let ((tangled-file (concat (file-name-sans-extension file) ".el")))
|
||||||
(tangled-file (concat (file-name-sans-extension file) ".el")))
|
|
||||||
;; Tangle only if the Org file is newer than the Elisp file.
|
;; Tangle only if the Org file is newer than the Elisp file.
|
||||||
(unless (org-file-newer-than-p
|
(unless (org-file-newer-than-p
|
||||||
tangled-file
|
tangled-file
|
||||||
(file-attribute-modification-time (file-attributes file)))
|
(file-attribute-modification-time
|
||||||
|
(file-attributes (file-truename file))))
|
||||||
(org-babel-tangle-file file tangled-file "emacs-lisp\\|elisp"))
|
(org-babel-tangle-file file tangled-file "emacs-lisp\\|elisp"))
|
||||||
(if compile
|
(if compile
|
||||||
(progn
|
(progn
|
||||||
|
|
Loading…
Reference in a new issue