Browse Source

ob-lilypond.el (ly-process-basic): Don't use `ly-gen-png'

* ob-lilypond.el (ly-process-basic): Don't use `ly-gen-png'
and friends, rely on the extension of the output file.

Thanks to Florian Beck for suggesting this.
Bastien Guerry 5 years ago
parent
commit
f518bc8f81
1 changed files with 5 additions and 4 deletions
  1. 5 4
      lisp/ob-lilypond.el

+ 5 - 4
lisp/ob-lilypond.el

@@ -152,10 +152,11 @@ specific arguments to =org-babel-tangle="
       " -dbackend=eps "
       "-dno-gs-load-fonts "
       "-dinclude-eps-fonts "
-      (cond (ly-gen-png  "--png ")
-	    (ly-gen-pdf  "--pdf ")
-	    (ly-use-eps  "--ps ")
-	    (t "--png "))
+      (pcase (file-name-extension out-file)
+        ("pdf" "--pdf ")
+        ("ps" "--ps ")
+        ("png" "--png ")
+        (t "--png "))
       "--output="
       (file-name-sans-extension out-file)
       " "