diff options
author | Ludovic Courtès | 2009-05-25 12:47:24 +0200 |
---|---|---|
committer | Ludovic Courtès | 2009-05-25 12:47:47 +0200 |
commit | a8a3c031c40a95c387893a2be9606df3c50f09d6 (patch) | |
tree | 1773760f23fa084b94a07e1dc28343c6c071f7e3 /src | |
parent | f37487368372c5ab6207e756b4b4ae89c6d145c3 (diff) | |
download | skribilo-a8a3c031c40a95c387893a2be9606df3c50f09d6.tar.gz skribilo-a8a3c031c40a95c387893a2be9606df3c50f09d6.tar.lz skribilo-a8a3c031c40a95c387893a2be9606df3c50f09d6.zip |
html: Fix confusion around `unspecified?'.
* src/guile/skribilo/engine/html.scm (unspecified?): New procedure.
This fixes the choice of a default title-number separator for chapters
in `&html-generic-subdocument', as reported by James Haggerty
<james.haggerty@gmail.com>.
Diffstat (limited to 'src')
-rw-r--r-- | src/guile/skribilo/engine/html.scm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/guile/skribilo/engine/html.scm b/src/guile/skribilo/engine/html.scm index 4a9f99f..42f18b2 100644 --- a/src/guile/skribilo/engine/html.scm +++ b/src/guile/skribilo/engine/html.scm @@ -58,6 +58,14 @@ (if (not (engine? base-engine)) (error "bootstrap problem: base engine broken" base-engine)) +(define unspecified? + ;; XXX: Hack to recognize the unspecified value as understood by + ;; `engine-custom' et al. + (let ((really-unspecified? unspecified?)) + (lambda (x) + (or (really-unspecified? x) + (eq? x 'unspecified))))) + ;*---------------------------------------------------------------------*/ ;* html-file-default ... */ ;*---------------------------------------------------------------------*/ |