From 2a315ab59d3365bb3e1150d763f4094d95041411 Mon Sep 17 00:00:00 2001 From: stardiviner Date: Mon, 2 Apr 2018 13:47:28 +0800 Subject: [PATCH] ob-clojure-literate: Handle no :file specified file is nil case * ob-clojure-literate.el (ob-clojure-literate-inject-code): Handle no :file specified file is nil case. --- contrib/lisp/ob-clojure-literate.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/contrib/lisp/ob-clojure-literate.el b/contrib/lisp/ob-clojure-literate.el index 0c928572b..5dec2ad9b 100644 --- a/contrib/lisp/ob-clojure-literate.el +++ b/contrib/lisp/ob-clojure-literate.el @@ -265,7 +265,7 @@ Then you need to assign image variable to this :file value like: (directory (and dir (file-name-as-directory (expand-file-name dir)))) (result-type (cdr (assq :results params))) (file (cdr (assq :file params))) - (file-name (file-name-base file)) + (file-name (and file (file-name-base file))) ;; TODO: future support `:graphics-file' to avoid collision. (graphics-result (member "graphics" (cdr (assq :result-params params)))) ;; (graphics-file (cdr (assq :graphics-file params)))