From 7f201bcf3ff9112757a10cc606d9794957ed18a4 Mon Sep 17 00:00:00 2001 From: David Kastrup Date: Tue, 4 Aug 2015 17:30:15 +0200 Subject: [PATCH] Export markup-function? and markup-list-function? --- scm/markup-macros.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/scm/markup-macros.scm b/scm/markup-macros.scm index 09ab0fc8f2..6c50ec5128 100644 --- a/scm/markup-macros.scm +++ b/scm/markup-macros.scm @@ -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))) -- 2.39.2