pollen/scribblings/third-tutorial-files/directory-require.rkt

7 lines
246 B
Racket

#lang racket/base
(require pollen/decode txexpr)
(define (root . elements)
(make-txexpr 'root null (decode-elements elements
#:txexpr-elements-proc detect-paragraphs
#:string-proc (compose smart-quotes smart-dashes))))
(provide root)