(muse-html-encoding)" ?>
<lisp>
(concat (muse-publishing-directive "title")
(let ((author (muse-publishing-directive "author")))
(if (not (string= author (user-full-name)))
(concat " (by " author ")"))))</lisp>
(muse-style-element :style-sheet muse-publishing-current-style)
(concat (muse-publishing-directive "title")
(let ((author (muse-publishing-directive "author")))
(if (not (string= author (user-full-name)))
(concat " (by " author ")"))))
(muse-html-insert-contents 3)