r8226: update to new dtd writing functions

[wol.git] / genpage.lisp

diff --git a/genpage.lisp b/genpage.lisp
index bc5d57df1725deaf019b8a3f383ae46ab275230c..4b1dbf44861f24ee43ce04e9593a6e39bb229b92 100644 (file)
--- a/genpage.lisp
+++ b/genpage.lisp
@@ -7,12 +7,12 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Jun 2003
 ;;;;
-;;;; $Id: genpage.lisp,v 1.1 2003/07/16 16:02:21 kevin Exp $
+;;;; $Id$
 ;;;;
 ;;;; 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