mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-09-29 21:37:50 +00:00
Code Releases Activity

ob-lilypond.el (ly-process-basic): Bugfix, don't use `pcase'

Browse source 
* ob-lilypond.el (ly-process-basic): Bugfix, don't use
`pcase'.

Thanks to Achim Gratz for suggesting this.
This commit is contained in:
Bastien Guerry 2013-01-31 11:17:18 +01:00
parent c17e07e94f
commit 7dbe05551d
1 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/ob-lilypond.el
View file

@ -152,11 +152,11 @@ specific arguments to =org-babel-tangle="
" -dbackend=eps "
"-dno-gs-load-fonts "
"-dinclude-eps-fonts "
(pcase (file-name-extension out-file)
("pdf" "--pdf ")
("ps" "--ps ")
("png" "--png ")
(t "--png "))
(or (cdr (assoc (file-name-extension "test.pdf")
'(("pdf" . "--pdf ")
("ps" . "--ps ")
("png" . "--png "))))
"--png ")
"--output="
(file-name-sans-extension out-file)
" "