[Display date in compact-show-viewer
clinton@unknownlamer.org**20080107224116] {
hunk ./src/packages.lisp 47
-  (:import-from :metabang.utilities :date-string :symbol->string)
+  (:import-from :metabang.utilities
+		:date-string :date-string-brief :symbol->string)
hunk ./src/web-common.lisp 95
-  (<:as-html (show-title show)))
+  (<:format "~A: ~A"
+	    (date-string-brief (show-date show))
+	    (show-title show)))
}