X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=package.lisp;h=8646698a4649c699e749759726699f72a7be2e54;hb=aab275e8e82b4a4a4af4749d79ca49d2dd596c1c;hp=b8c5582853efc294479ebe51f64290d9af21a1a6;hpb=2fe4af4d562f6d76038e85d68e5808a35d6fe2c5;p=kmrcl.git

diff --git a/package.lisp b/package.lisp
index b8c5582..8646698 100644
--- a/package.lisp
+++ b/package.lisp
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: package.lisp,v 1.10 2002/11/02 18:00:45 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
@@ -75,6 +71,8 @@
 	  #:stream-subst
 	  #:remove-tree-if
 	  #:find-tree
+	  #:with-each-file-line
+	  #:with-each-stream-line
 	  #:print-file-contents
 	  #:read-file-to-string
 	  #:read-file-to-strings
@@ -108,38 +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
-
-	  ;; From ml-class.lisp
-	  #:ml-class
-	  #:ml-class-title
-	  #:load-all-subobjects
-	  #:display-ml-class
-	  #:xml-cdata
 	  ))