[Strict Atom 1.0, XHTML 1.0 and CSS 3.0 conformance. matthias@benkard.de**20070531080720] { hunk ./journal.css 1 +/* CSS version 3.0 */ + hunk ./journal.css 23 + background-color: inherit; hunk ./journal.css 30 - //font-variant: small-caps; + /* font-variant: small-caps; */ hunk ./journal.lisp 357 - (xml-as-is "Geschwafel eines libertärsozialistischen Geeks")) + (xml-as-is "Geschwafel eines libertärsozialistischen Geeks")) hunk ./journal.lisp 371 - :id (uuid-of journal-entry) + :id (format nil "~(~A~)" + (uuid-of journal-entry)) hunk ./journal.lisp 417 - :method "DELETE" + :method "post" hunk ./journal.lisp 419 - (<:input :type "hidden" - :name "action" - :value "delete") - (<:input :type "hidden" - :name "post" - :value (prin1-to-string (id-of journal-entry))) - (<:button :type "submit" - (<:as-is "Löschen"))) + (<:div :style "display: inline;" + (<:input :type "hidden" + :name "action" + :value "delete") + (<:input :type "hidden" + :name "post" + :value (prin1-to-string (id-of journal-entry))) + (<:button :type "submit" + (<:as-is "Löschen")))) hunk ./journal.lisp 431 - :method "GET" + :method "get" hunk ./journal.lisp 433 - (<:input :type "hidden" - :name "action" - :value "edit") - (<:input :type "hidden" - :name "post" - :value (prin1-to-string (id-of journal-entry))) - (<:button :type "submit" - (<:as-is "Bearbeiten"))) + (<:div :style "display: inline;" + (<:input :type "hidden" + :name "action" + :value "edit") + (<:input :type "hidden" + :name "post" + :value (prin1-to-string (id-of journal-entry))) + (<:button :type "submit" + (<:as-is "Bearbeiten")))) hunk ./journal.lisp 479 - :method "POST" + :method "post" hunk ./journal.lisp 481 - (<:input :type "hidden" - :name "post" - :value (prin1-to-string (id-of journal-entry))) - (<:input :type "hidden" - :name "action" - :value "post-comment") + (<:div :style "display: hidden" + (<:input :type "hidden" + :name "post" + :value (prin1-to-string (id-of journal-entry))) + (<:input :type "hidden" + :name "action" + :value "post-comment")) hunk ./journal.lisp 511 - (<:button :type "submit" - (<:as-is "Veröffentlichen")))))) + (<:div + (<:button :type "submit" + (<:as-is "Veröffentlichen"))))))) + + +(yaclml:deftag ")) + (emit-open-tag "html" `(("dir" . ,dir) ("lang" . ,lang) ("xmlns" . ,xmlns))) + (emit-body body) + (emit-close-tag "html")) hunk ./journal.lisp 528 - (<:html + (