|
@@ -216,12 +216,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))
|
|
|
|
- (tangled-file (concat (file-name-sans-extension file) ".el")))
|
|
|
|
|
|
+ (let ((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"))
|
|
(org-babel-tangle-file file tangled-file "emacs-lisp"))
|
|
(if compile
|
|
(if compile
|
|
(progn
|
|
(progn
|