]> git.donarmstrong.com Git - lilypond.git/commitdiff
Export markup-function? and markup-list-function?
authorDavid Kastrup <dak@gnu.org>
Tue, 4 Aug 2015 15:30:15 +0000 (17:30 +0200)
committerDavid Kastrup <dak@gnu.org>
Tue, 11 Aug 2015 06:22:50 +0000 (08:22 +0200)
scm/markup-macros.scm

index 09ab0fc8f243dbf991f096da29c2b5f1259fa4fd..6c50ec51280e614796229fd565401b9474d16d07 100644 (file)
@@ -236,11 +236,11 @@ interpreted, returns a list of stencils instead of a single one"
 ;;;;;;;;;;;;;;;;;;;;;;
 ;;; markup type predicates
 
-(define (markup-function? x)
+(define-public (markup-function? x)
   (and (markup-command-signature x)
        (not (object-property x 'markup-list-command))))
 
-(define (markup-list-function? x)
+(define-public (markup-list-function? x)
   (and (markup-command-signature x)
        (object-property x 'markup-list-command)))