Browse Source

babel: load-file works for symlinks -- Thanks to Martin Kühl

Eric Schulte 15 years ago
parent
commit
131441dbd2
1 changed files with 2 additions and 1 deletions
  1. 2 1
      contrib/babel/lisp/org-babel-tangle.el

+ 2 - 1
contrib/babel/lisp/org-babel-tangle.el

@@ -48,7 +48,8 @@ file using `load-file'."
   (flet ((age (file)
               (time-to-seconds
                (time-subtract (current-time)
-                              (sixth (file-attributes file))))))
+                              (sixth (file-attributes
+                                      (file-truename file)))))))
     (let* ((base-name (file-name-sans-extension file))
            (exported-file (concat base-name ".el")))
       ;; tangle if the org-mode file is newer than the elisp file