summaryrefslogtreecommitdiff
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