X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=stdsite.lisp;h=aef383be5f87f02032b5eb4cc0c97d0bf934423c;hb=8ceb2fb6fead55c464fec1b627146a4aa9ad1bf5;hp=ab0ef1ccacfa85fd374840b9a3e333a0c2fbf988;hpb=cffe284d0e0c3f82ef4b13a4dc394f4bee3a40a0;p=lml2.git

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)