Index: crystalize.rkt ================================================================== --- crystalize.rkt +++ crystalize.rkt @@ -172,11 +172,11 @@ ;; Convert a bunch of information about an article into some nice English and links. (define (make-article-footertext pagenode series disposition disp-note-id note-count) (define s-title (series-title)) (define s-noun (series-noun)) (define series-part - (cond [(non-empty-string? series-title) + (cond [(non-empty-string? s-title) (format "This is ~a, part of ‘~a’." s-noun series s-title)] [else ""]))