@@ -7,10 +7,11 @@ scribble/example) @(require (for-label "../pollen.rkt" "../dust.rkt" "../cache.rkt" + "../series-list.rkt" racket/base racket/contract txexpr sugar/coerce pollen/tag @@ -182,24 +183,31 @@ "individual as Queequeg circulating among the polite society of a civilized " "town, that astonishment soon departed upon taking my first daylight " "stroll through the streets of New Bedford…"))) (default-title (get-elements doc))] -@defproc[(metas-series-pagenode) pagenode?] +@defproc[(current-series-pagenode) pagenode?] If @code{(current-metas)} has the key @racket['series], converts its value to the pagenode pointing to that series, otherwise returns @racket['||]. -@defproc[(series-metas-noun) string?] - -If @code{(current-metas)} has the key @racket['series], and if the corresponding series defines a meta -value for @racket['noun-singular], then return it, otherwise return @racket[""]. - -@defproc[(series-metas-title) string?] - -If @code{(current-metas)} has the key @racket['series], and if the corresponding series defines a meta -value for @racket['title], then return it, otherwise return @racket[""]. +@examples[#:eval dust-eval +(require pollen/core) +(parameterize ([current-metas (hash 'series "marquee-fiction")]) + (current-series-pagenode))] + +@defproc[(current-series-noun) string?] + +If @code{(current-metas)} has the key @racket['series] and if there is a corresponding +@racket[series] in the @racket[series-list], return its @racket[series-noun-singular] value; +otherwise return @racket[""]. + +@defproc[(current-series-title) string?] + +If @code{(current-metas)} has the key @racket['series] and if there is a corresponding +@racket[series] in the @racket[series-list], return its @racket[series-title] value; +otherwise return @racket[""]. @defproc[(invalidate-series) (or/c void? boolean?)] If the current article specifies a @racket['series] meta, and if a corresponding @filepath{.poly.pm} file exists in @racket[series-folder], attempts to “touch” the last-modified timestamp on that file,