diff options
author | bar <bar@x220.localhost> | 2022-09-05 01:46:00 +0300 |
---|---|---|
committer | Bastien Guerry <bzg@gnu.org> | 2022-09-05 08:27:07 +0200 |
commit | 7f32f80f9589f7cbf944135e4f3cd5c690eb5db2 (patch) | |
tree | 8d36dad574f5ea295a14e93156a8650ec899efeb | |
parent | caf613d8c620d0e4f28ff645469ecd3de8eb85d5 (diff) |
file-name-directory return nil with arg file
-rw-r--r-- | lisp/ox-groff.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/ox-groff.el b/lisp/ox-groff.el index 3e376f1..1eb3da7 100644 --- a/lisp/ox-groff.el +++ b/lisp/ox-groff.el @@ -1894,7 +1894,7 @@ through the command specified in `org-groff-pdf-process'. Return PDF file name or an error if it couldn't be produced." (let* ((base-name (file-name-sans-extension (file-name-nondirectory file))) (full-name (file-truename file)) - (out-dir (file-name-directory file)) + (out-dir (file-name-directory full-name)) (time (org-groff--time-sec nil)) ;; Properly set working directory for compilation. (default-directory (if (file-name-absolute-p file) |