*How can I achieve the Desired Output as shown below?*
I think I'm running into an issue with `define`. According to the docs,
there are two forms of `define`, one which binds to the result of an
expression, and the other to a procedure. It seems as if the 2nd,
parameter-taking form is somehow stirpping the default-tag-function of its
tag. How can I preserve the `txexpr` generated by `default-tag-function`?
Input (*test.poly.pm*)
#lang pollen
Joan Didion called Joseph Conrad's βtitle{Victory}, "maybe my favorite book
in the world."
Input (*pollen.rkt*)
*#lang racket/base(require pollen/tag racket/string txexpr
pollen/decode)(provide (all-defined-out))(define (title text)
(default-tag-function 'book-title) (string-join (list "π " text)))(define
(root . items) (decode (txexpr 'root '() items)
#:txexpr-elements-proc decode-paragraphs #:exclude-tags '(style
script)))*Actual Output (*test.html*)
<html>
<head>
<meta charset="UTF-8">
<title>π: </title>
<link rel="stylesheet" type="text/css" href="styles.css" />
</head>
<body>
<root>Joan Didion called Joseph Conrad's π Victory, "maybe my favorite
book in the world."</root>
</body>
</html>
Desired Output (*test.html*)
<html>
<head>
<meta charset="UTF-8">
<title>π: </title>
<link rel="stylesheet" type="text/css" href="styles.css" />
</head>
<body>
<root>Joan Didion called Joseph Conrad's <book-title>π Victory
</book-title>, "maybe my favorite book in the world."</root>
</body>
</html>
--
You received this message because you are subscribed to the Google Groups
"Pollen" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
For more options, visit https://groups.google.com/d/optout.
