r3474: *** empty log message ***

[kmrcl.git] / package.lisp

diff --git a/package.lisp b/package.lisp
index afb5385c9543902616f5312283da2b343ecc4203..8646698a4649c699e749759726699f72a7be2e54 100644 (file)
--- a/package.lisp
+++ b/package.lisp
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: package.lisp,v 1.12 2002/11/07 22:08:41 kevin Exp $
+;;;; $Id: package.lisp,v 1.13 2002/11/25 07:45:36 kevin Exp $
 ;;;;
 ;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -22,11 +22,7 @@
 
 (defpackage #:kmrcl
   (:nicknames :kl)
-  (:use :common-lisp
-       #+(or aserve allegro) :net.html.generator 
-       #+(or aserve allegro) :net.aserve
-       #+allegro :net.xml.parser
-       )
+  (:use :common-lisp)
   (:export #:bind-if
           #:bind-when
           #:aif
@@ -110,31 +106,14 @@
          #:start-telnet-server   
 
          ;; From web-utils
+         #:*base-url*
+         #:base-url!
+         #:make-url
          #:*standard-html-header*
          #:*standard-xhtml-header*
          #:*standard-xml-header*
          #:xml-cdata
          #:user-agent-ie-p
-         
-         ;; From web-utils-aserve
-         #:cgi-var
-         #:print-http
-         #:princ-http
-         #:base-url!
-         #:make-url
-         #:with-tag
-         #:with-tag-attribute
-         #:princ-http-with-color
-         #:princ-http-with-size
-         #:with-link
-         #:home-link
-         #:head
-         #:with-page
-         #:wrap-with-xml
-         #:parse-xml-no-ws
-         #:positions-xml-tag-contents
-         #:xml-tag-contents
-         #:encode-query
          ))