X-Git-Url: http://git.kpe.io/?p=lml2.git;a=blobdiff_plain;f=stdsite.lisp;h=259bb80da1d6fbc0b95f02350cd3cd5c3d268ded;hp=ab0ef1ccacfa85fd374840b9a3e333a0c2fbf988;hb=1726bee5998c1f574c84f294f26b982e124da629;hpb=cffe284d0e0c3f82ef4b13a4dc394f4bee3a40a0

diff --git a/stdsite.lisp b/stdsite.lisp
index ab0ef1c..259bb80 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: stdsite.lisp,v 1.7 2003/07/12 17:54:05 kevin Exp $
 ;;;;
-;;;; 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)