summaryrefslogtreecommitdiff
path: root/journal.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'journal.lisp')
-rwxr-xr-xjournal.lisp8
1 files changed, 0 insertions, 8 deletions
diff --git a/journal.lisp b/journal.lisp
index 5353de1..2dfa4bc 100755
--- a/journal.lisp
+++ b/journal.lisp
@@ -228,14 +228,6 @@
(<:as-is "Ver&ouml;ffentlichen")))))))
-(yaclml:deftag <xhtml (&attribute dir lang xmlns (prologue t) &body body)
- (when prologue
- (emit-princ "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">"))
- (emit-open-tag "html" `(("dir" . ,dir) ("lang" . ,lang) ("xmlns" . ,xmlns)))
- (emit-body body)
- (emit-close-tag "html"))
-
-
(defun show-web-journal ()
(http-add-header "Last-Modified" (http-timestamp (compute-journal-last-modified-date)))
(http-send-headers "text/html; charset=UTF-8")