X-Git-Url: http://git.kpe.io/?p=lml2.git;a=blobdiff_plain;f=stdsite.lisp;h=aef383be5f87f02032b5eb4cc0c97d0bf934423c;hp=ab0ef1ccacfa85fd374840b9a3e333a0c2fbf988;hb=8f6d5f2e61de2208e20a7c887a8bda5ff989f741;hpb=cffe284d0e0c3f82ef4b13a4dc394f4bee3a40a0 diff --git a/stdsite.lisp b/stdsite.lisp index ab0ef1c..aef383b 100644 --- a/stdsite.lisp +++ b/stdsite.lisp @@ -7,15 +7,14 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Aug 2002 ;;;; -;;;; $Id: stdsite.lisp,v 1.5 2003/06/23 20:39:40 kevin Exp $ +;;;; $Id$ ;;;; -;;;; This file, part of LML2, is Copyright (c) 2002 by Kevin M. Rosenberg +;;;; This file, part of LML2, is Copyright (c) 2000-2003 by Kevin Rosenberg. +;;;; Rights of modification and redistribution are in the LICENSE file. ;;;; -;;;; LML2 users are granted the rights to distribute and use this software -;;;; as governed by the terms of the GNU General Public License v2 -;;;; (http://www.gnu.org/licenses/gpl.html) ;;;; ************************************************************************* + ;;; A "standard site" is a format for a certain style of web page. ;;; It is based on the LML2 package. ;;; A stdsite page expects to include the following files: @@ -64,7 +63,7 @@ (defmacro print-std-page (file title format &body body) `(progn - (html-prologue ,format) + (dtd-prologue ,format) (html ((:html :xmlns "http://www.w3.org/1999/xhtml") (std-head ,title)