mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-06 20:20:20 +02:00
10 lines
197 B
EmacsLisp
10 lines
197 B
EmacsLisp
|
|
(defun html-page (title &rest contents)
|
|
(concat "<HTML>\n"
|
|
"<HEAD>\n"
|
|
"<TITLE>" title "</TITLE>\n"
|
|
"</HEAD>\n"
|
|
"<BODY>\n"
|
|
(apply 'concat contents)
|
|
"</BODY>\n"
|
|
"</HTML>\n"))
|