r3074: *** empty log message ***

[kmrcl.git] / package.lisp

diff --git a/package.lisp b/package.lisp
index fb964605b7dd15e9566152bce548a91f387a408f..90054ecaf14ab122ecda47a90292ce5706e0aea0 100644 (file)
--- a/package.lisp
+++ b/package.lisp
@@ -7,12 +7,13 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: package.lisp,v 1.1 2002/10/06 13:21:47 kevin Exp $
+;;;; $Id: package.lisp,v 1.7 2002/10/16 22:59:27 kevin Exp $
 ;;;;
 ;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
 ;;;; KMRCL users are granted the rights to distribute and use this software
-;;;; as governed by the terms of the GNU General Public License.
+;;;; as governed by the terms of the Lisp Lesser GNU Public License
+;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
 ;;;; *************************************************************************
 
 (declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))
@@ -20,7 +21,7 @@
 (in-package :cl-user)
 
 (defpackage #:kmrcl
-  (:nicknames :k)
+  (:nicknames :kl)
   (:use :common-lisp
        #+(or aserve allegro) :net.html.generator 
        #+(or aserve allegro) :net.aserve
@@ -124,7 +125,9 @@
          #:start-telnet-server   
 
          ;; From web-utils
-         #:std-xml-header
+         #:*std-html-header*
+         #:*std-xhtml-header*
+         #:*std-xml-header*
          #:xml-cdata
 
          ;; From web-utils-allegro
@@ -140,8 +143,7 @@
          #:with-link
          #:home-link
          #:head
-         #:with-xml-page
-         #:with-trans-page
+         #:with-page
          #:wrap-with-xml
          #:parse-xml-no-ws
          #:positions-xml-tag-contents
@@ -153,6 +155,7 @@
          #:ml-class-title
          #:load-all-subobjects
          #:display-ml-class
+         #:xml-cdata
          ))