;;;;;;;;;;;;;;;;;;
-(define-public ((marked-up-headfoot what-odd what-even)
+(define ((marked-up-headfoot what-odd what-even)
layout scopes page-number is-last-bookpart is-bookpart-last-page)
"Read variables @var{what-odd}, @var{what-even} from @var{layout},
and interpret them as markup. The @var{props} argument will include
(markup? (get what-even)))
(get what-even)
(get what-odd))))
+(export marked-up-headfoot)
-(define-public ((marked-up-title what) layout scopes)
+(define ((marked-up-title what) layout scopes)
"Read variables @var{what} from @var{scopes}, and interpret it as markup.
The @var{props} argument will include variables set in @var{scopes} (prefixed
with `header:'."
(if (markup? markup)
(interpret-markup layout props markup)
empty-stencil)))
+(export marked-up-title)