diff options
Diffstat (limited to 'lisp/org/ob-lilypond.el')
| -rw-r--r-- | lisp/org/ob-lilypond.el | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/lisp/org/ob-lilypond.el b/lisp/org/ob-lilypond.el index f1ea803ba31..d8016641ceb 100644 --- a/lisp/org/ob-lilypond.el +++ b/lisp/org/ob-lilypond.el @@ -4,7 +4,7 @@ ;; Author: Martyn Jago ;; Keywords: babel language, literate programming -;; Homepage: https://orgmode.org/worg/org-contrib/babel/languages/ob-doc-lilypond.html +;; URL: https://orgmode.org/worg/org-contrib/babel/languages/ob-doc-lilypond.html ;; This file is part of GNU Emacs. @@ -32,9 +32,13 @@ ;; This depends on epstopdf --- See https://www.ctan.org/pkg/epstopdf. ;;; Code: + +(require 'org-macs) +(org-assert-version) + (require 'ob) -(declare-function org-show-all "org" (&optional types)) +(declare-function org-fold-show-all "org-fold" (&optional types)) ;; FIXME: Doesn't this rather belong in lilypond-mode.el? (defalias 'lilypond-mode 'LilyPond-mode) @@ -108,7 +112,7 @@ you can leave the string empty on this case." :package-version '(Org . "8.2.7") :set (lambda (symbol value) - (set symbol value) + (set-default-toplevel-value symbol value) (setq org-babel-lilypond-ly-command (nth 0 value) org-babel-lilypond-pdf-command (nth 1 value) @@ -280,7 +284,7 @@ LINE is the erroneous line." (setq case-fold-search nil) (if (search-forward line nil t) (progn - (org-show-all) + (org-fold-show-all) (set-mark (point)) (goto-char (- (point) (length line)))) (goto-char temp)))) |