ob-lilypond: Fix failing tests
* testing/lisp/test-ob-lilypond.el (ob-lilypond/ly-attempt-to-open-pdf): (ob-lilypond/ly-attempt-to-play-midi): Fix failing tests due to quote mismatch in Emacs 25.
This commit is contained in:
parent
24aaa53573
commit
5204e000e5
|
@ -269,9 +269,8 @@
|
||||||
(org-babel-lilypond-attempt-to-open-pdf org-babel-lilypond-file t)))
|
(org-babel-lilypond-attempt-to-open-pdf org-babel-lilypond-file t)))
|
||||||
(delete-file pdf-file)
|
(delete-file pdf-file)
|
||||||
(kill-buffer (file-name-nondirectory pdf-file))
|
(kill-buffer (file-name-nondirectory pdf-file))
|
||||||
(should (equal
|
(should (string-prefix-p "No pdf file generated"
|
||||||
"No pdf file generated so can't display!"
|
(org-babel-lilypond-attempt-to-open-pdf pdf-file)))
|
||||||
(org-babel-lilypond-attempt-to-open-pdf pdf-file)))
|
|
||||||
(setq org-babel-lilypond-display-pdf-post-tangle post-tangle)))
|
(setq org-babel-lilypond-display-pdf-post-tangle post-tangle)))
|
||||||
|
|
||||||
(ert-deftest ob-lilypond/ly-attempt-to-play-midi ()
|
(ert-deftest ob-lilypond/ly-attempt-to-play-midi ()
|
||||||
|
@ -292,8 +291,8 @@
|
||||||
(org-babel-lilypond-attempt-to-play-midi org-babel-lilypond-file t)))
|
(org-babel-lilypond-attempt-to-play-midi org-babel-lilypond-file t)))
|
||||||
(delete-file midi-file)
|
(delete-file midi-file)
|
||||||
(kill-buffer (file-name-nondirectory midi-file))
|
(kill-buffer (file-name-nondirectory midi-file))
|
||||||
(should (equal
|
(should (string-prefix-p
|
||||||
"No midi file generated so can't play!"
|
"No midi file generated"
|
||||||
(org-babel-lilypond-attempt-to-play-midi midi-file)))
|
(org-babel-lilypond-attempt-to-play-midi midi-file)))
|
||||||
(setq org-babel-lilypond-play-midi-post-tangle post-tangle)))
|
(setq org-babel-lilypond-play-midi-post-tangle post-tangle)))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue