aboutsummaryrefslogtreecommitdiff
path: root/module/text/markup.scm
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2022-06-23 03:23:44 +0200
committerHugo Hörnquist <hugo@lysator.liu.se>2022-06-23 03:48:22 +0200
commit1976980d4a272fb7fc3694c734bfc6825edfc721 (patch)
tree8460db1176c64895e9968447588953fac85fe7d6 /module/text/markup.scm
parentRemove all inline use-modules. (diff)
downloadcalp-1976980d4a272fb7fc3694c734bfc6825edfc721.tar.gz
calp-1976980d4a272fb7fc3694c734bfc6825edfc721.tar.xz
Centralize (almost) all exports to :export in define-module.
Diffstat (limited to 'module/text/markup.scm')
-rw-r--r--module/text/markup.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/module/text/markup.scm b/module/text/markup.scm
index 53dab321..a7a905df 100644
--- a/module/text/markup.scm
+++ b/module/text/markup.scm
@@ -6,11 +6,12 @@
:use-module (ice-9 pretty-print)
:use-module (text util)
:use-module (text flow)
- :use-module (texinfo string-utils))
+ :use-module (texinfo string-utils)
+ :export (sxml->ansi-text))
;; Takes an HTML-like sxml coded tree, and produces a string with
;; appropriate spacing and ANSI-escapes for different tags.
-(define-public (sxml->ansi-text tree)
+(define (sxml->ansi-text tree)
((parse-tree ontree onleaf) tree))