'(blot-diameter
bottom-margin
cm
- foot-separation
- head-separation
horizontal-shift
in
indent
(("binding-offset" . ,w) . '())
(("top-margin" . ,h) . '())
(("bottom-margin" . ,h) . '())
- (("head-separation" . ,h) . '())
- (("foot-separation" . ,h) . '())
(("indent" . ,w) . '())
(("short-indent" . ,w) . '())))
(scaled-values
(lambda (v)
(let* ((var (module-variable old-scope v))
(val (if (variable? var) (variable-ref var) #f)))
-
+
(if (number? val)
(module-define! scope v (/ val scale))
;; Cannot warn for non-numbers, eg. for paper-width, paper-height.