summary refs log tree commit diff
path: root/doc
diff options
context:
space:
mode:
authorLudovic Courtès2020-11-01 15:48:55 +0100
committerLudovic Courtès2020-11-01 15:53:46 +0100
commit1f01fe1e1531200a5b712a835f6915fbd8562d32 (patch)
tree6abd2305860a59b00eb5d481ed0a00271663a494 /doc
parent5d0d8ca978630d9901700a858af25cdde051a2ee (diff)
downloadskribilo-1f01fe1e1531200a5b712a835f6915fbd8562d32.tar.gz
skribilo-1f01fe1e1531200a5b712a835f6915fbd8562d32.tar.lz
skribilo-1f01fe1e1531200a5b712a835f6915fbd8562d32.zip
justify: Turn '*margin*' into a parameter.
* src/guile/skribilo/utils/justify.scm (*margin*): Turn into a
parameter.
(with-justification, with-justification/noflush): Use 'parameterize'
instead of 'set!'.
* src/guile/skribilo/engine/info.scm: Adjust accordingly.
* doc/modules/skribilo/documentation/api.scm (doc-markup): Likewise.
Diffstat (limited to 'doc')
-rw-r--r--doc/modules/skribilo/documentation/api.scm5
1 files changed, 2 insertions, 3 deletions
diff --git a/doc/modules/skribilo/documentation/api.scm b/doc/modules/skribilo/documentation/api.scm
index 21044a7..e7739fb 100644
--- a/doc/modules/skribilo/documentation/api.scm
+++ b/doc/modules/skribilo/documentation/api.scm
@@ -273,8 +273,7 @@ def @SkribiloExample named @Title {} right x {
               (let ((protos (markup-option n 'prototypes))
                     (opts   (markup-option n 'options))
                     (params (markup-option n 'parameters))
-                    (see    (markup-option n 'see-also))
-                    (margin *margin*))
+                    (see    (markup-option n 'see-also)))
                 (output (linebreak) e)
 
                 (with-justification
@@ -284,7 +283,7 @@ def @SkribiloExample named @Title {} right x {
                                (output "-- Markup: " e)
                                (output p e))
                              protos))
-                 (+ *margin* 1))
+                 1)
 
                 (and (pair? opts)
                      (output