X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=genpage.lisp;h=4b1dbf44861f24ee43ce04e9593a6e39bb229b92;hb=97e14ef9a350c61c9891c1d43aab815c574c1ce6;hp=4a00b5b0ec9a9be19ea8fe94e3b05a065d4a2394;hpb=115593575b49ab252692a959380e94707e385de3;p=wol.git diff --git a/genpage.lisp b/genpage.lisp index 4a00b5b..4b1dbf4 100644 --- a/genpage.lisp +++ b/genpage.lisp @@ -12,7 +12,7 @@ ;;;; This file, part of wol, is Copyright (c) 2003 by Kevin M. Rosenberg ;;;; ************************************************************************* -(in-package #:wol) +(in-package wol) (defvar *header-table* (make-hash-table :size 100 :test 'eq) "Table of header functions indexed by site") @@ -105,7 +105,6 @@ (when title-str (html (:title (lml-write-string title-str))))))) - (defun page-prologue (title format css altcss) (ecase format (:xml