Hey all,

looks like I’m having quite a few problems with ob-lilypond (Org-mode version 8.2.7b). To ensure that my setup is correct I ran the tests mentioned on http://orgmode.org/worg/org-contrib/babel/languages/ob-doc-lilypond.html#sec-9:

M-x load-file RET ~/path/to/current/org-mode-git-repository/testing/lisp/test-ob-lilypond.el
M-x ert RET RET

And this is what I got (short version):

Selector: t
Passed: 6
Failed: 36 (36 unexpected)
Total: 42/42

Started at: 2015-03-25 13:32:19+0100
Finished.
Finished at: 2015-03-25 13:32:19+0100

...FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF…F

Am I missing something?

Thanks for any help!

patrick

Error message (long version):

Selector: t
Passed: 6
Failed: 36 (36 unexpected)
Total: 42/42

Started at: 2015-03-25 13:32:19+0100
Finished.
Finished at: 2015-03-25 13:32:19+0100

...FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF...F

F ob-lilypond/ly-arrange-mode
(ert-test-failed
((should
(boundp 'org-babel-lilypond-arrange-mode))
:form
(boundp org-babel-lilypond-arrange-mode)
:value nil))

F ob-lilypond/ly-attempt-to-open-pdf
(void-variable org-babel-lilypond-display-pdf-post-tangle)

F ob-lilypond/ly-attempt-to-play-midi
(void-variable org-babel-lilypond-play-midi-post-tangle)

F ob-lilypond/ly-check-for-compile-error
(void-function org-babel-lilypond-check-for-compile-error)

F ob-lilypond/ly-command-ly/bound
(ert-test-failed
((should
(boundp 'org-babel-lilypond-ly-command))
:form
(boundp org-babel-lilypond-ly-command)
:value nil))

F ob-lilypond/ly-command-ly/stringp
(void-variable org-babel-lilypond-ly-command)

F ob-lilypond/ly-command-midi/bound
(ert-test-failed
((should
(boundp 'org-babel-lilypond-midi-command))
:form
(boundp org-babel-lilypond-midi-command)
:value nil))

F ob-lilypond/ly-command-midi/stringp
(void-variable org-babel-lilypond-midi-command)

F ob-lilypond/ly-command-pdf/bound
(ert-test-failed
((should
(boundp 'org-babel-lilypond-pdf-command))
:form
(boundp org-babel-lilypond-pdf-command)
:value nil))

F ob-lilypond/ly-command-pdf/stringp
(void-variable org-babel-lilypond-pdf-command)

F ob-lilypond/ly-commands/customize
(ert-test-failed
((should
(equal
(list org-babel-lilypond-ly-command org-babel-lilypond-pdf-command org-babel-lilypond-midi-command)
(list "nonsense" "bla" "fasel")))
:form
(equal
(nil nil nil)
("nonsense" "bla" "fasel"))
:value nil :explanation
(list-elt 0
(different-types nil "nonsense"))))

F ob-lilypond/ly-commands/darwin
(ert-test-failed
((should
(equal
(list org-babel-lilypond-ly-command org-babel-lilypond-pdf-command org-babel-lilypond-midi-command)
(list "/Applications/lilypond.app/Contents/Resources/bin/lilypond" "open" "open")))
:form
(equal
(nil nil nil)
("/Applications/lilypond.app/Contents/Resources/bin/lilypond" "open" "open"))
:value nil :explanation
(list-elt 0
(different-types nil "/Applications/lilypond.app/Contents/Resources/bin/lilypond"))))

F ob-lilypond/ly-commands/other
(ert-test-failed
((should
(equal
(list org-babel-lilypond-ly-command org-babel-lilypond-pdf-command org-babel-lilypond-midi-command)
(list "lilypond" "xdg-open" "xdg-open")))
:form
(equal
(nil nil nil)
("lilypond" "xdg-open" "xdg-open"))
:value nil :explanation
(list-elt 0
(different-types nil "lilypond"))))

F ob-lilypond/ly-commands/windows-nt
(ert-test-failed
((should
(equal
(list org-babel-lilypond-ly-command org-babel-lilypond-pdf-command org-babel-lilypond-midi-command)
(list "lilypond" "" "")))
:form
(equal
(nil nil nil)
("lilypond" "" ""))
:value nil :explanation
(list-elt 0
(different-types nil "lilypond"))))

F ob-lilypond/ly-compile-lilyfile
(void-variable org-babel-lilypond-ly-command)

F ob-lilypond/ly-compile-post-tangle
(ert-test-failed
((should
(boundp 'org-babel-lilypond-compile-post-tangle))
:form
(boundp org-babel-lilypond-compile-post-tangle)
:value nil))

F ob-lilypond/ly-display-pdf-post-tangle
(ert-test-failed
((should
(boundp 'org-babel-lilypond-display-pdf-post-tangle))
:form
(boundp org-babel-lilypond-display-pdf-post-tangle)
:value nil))

F ob-lilypond/ly-gen-html
(ert-test-failed
((should
(boundp 'org-babel-lilypond-gen-pdf))
:form
(boundp org-babel-lilypond-gen-pdf)
:value nil))

F ob-lilypond/ly-gen-png
(ert-test-failed
((should
(boundp 'org-babel-lilypond-gen-png))
:form
(boundp org-babel-lilypond-gen-png)
:value nil))

F ob-lilypond/ly-gen-svg
(ert-test-failed
((should
(boundp 'org-babel-lilypond-gen-svg))
:form
(boundp org-babel-lilypond-gen-svg)
:value nil))

F ob-lilypond/ly-get-header-args
(void-function org-babel-lilypond-set-header-args)

F ob-lilypond/ly-mark-error-line
(void-function org-babel-lilypond-mark-error-line)

F ob-lilypond/ly-parse-error-line
(void-function org-babel-lilypond-parse-error-line)

F ob-lilypond/ly-parse-line-num
(void-function org-babel-lilypond-parse-line-num)

F ob-lilypond/ly-play-midi-post-tangle
(ert-test-failed
((should
(boundp 'org-babel-lilypond-play-midi-post-tangle))
:form
(boundp org-babel-lilypond-play-midi-post-tangle)
:value nil))

F ob-lilypond/ly-process-compile-error
(ert-test-failed
((should
(equal 238
(point)))
:form
(equal 238 1)
:value nil :explanation
(different-atoms
(238 "#xee" "?î")
(1 "#x1" "?"))))

F ob-lilypond/ly-set-header-args
(void-function org-babel-lilypond-set-header-args)

F ob-lilypond/ly-switch-extension-with-extensions
(void-function org-babel-lilypond-switch-extension)

F ob-lilypond/ly-switch-extension-with-paths
(void-function org-babel-lilypond-switch-extension)

F ob-lilypond/ly-toggle-arrange-mode
(void-variable org-babel-lilypond-arrange-mode)

F ob-lilypond/ly-toggle-html-generation-toggles-flag
(void-variable org-babel-lilypond-gen-html)

F ob-lilypond/ly-toggle-midi-play-toggles-flag
(void-variable org-babel-lilypond-play-midi-post-tangle)

F ob-lilypond/ly-toggle-pdf-display-toggles-flag
(void-variable org-babel-lilypond-display-pdf-post-tangle)

F ob-lilypond/ly-toggle-pdf-generation-toggles-flag
(void-variable org-babel-lilypond-gen-pdf)

F ob-lilypond/ly-toggle-png-generation-toggles-flag
(void-variable org-babel-lilypond-gen-png)

F ob-lilypond/use-eps
(ert-test-failed
((should
(boundp 'org-babel-lilypond-use-eps))
:form
(boundp org-babel-lilypond-use-eps)
:value nil))