/[clhp]/clhp/clhp.lisp
ViewVC logotype

Diff of /clhp/clhp.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.16 by aventimiglia, Fri Oct 17 12:58:04 2003 UTC revision 1.17 by aventimiglia, Fri Oct 17 13:11:44 2003 UTC
# Line 21  Line 21 
21  ;; email: aventimiglia@common-lisp.net  ;; email: aventimiglia@common-lisp.net
22  ;; HomePage: http://common-lisp.net/project/clhp/  ;; HomePage: http://common-lisp.net/project/clhp/
23    
 ;(eval-when (:compile-toplevel)  
 ;  (unless (find-package :cgi)  
 ;    (load "cgi")))  
   
 ;(defpackage #:net.common-lisp.aventimiglia.clhp  
 ;  (:nicknames :clhp)  
 ;  (:use :cgi :cl)  
 ;  (:import-from :cgi #:cond-bind #:list-to-a-list)  
 ;  (:export #:parse #:*clhp-version* #:echo #:include #:xml-element  
 ;           #:make-xml-element #:copy-xml-element #:xml-element-attributes  
 ;           #:xml-element-name #:xml-element-contents #:xml-element-p #:tag))  
   
24  (in-package :clhp)  (in-package :clhp)
25    
26  ;; This elaborate reader macro converts the cvs Date keywords and  ;; This elaborate reader macro converts the cvs Date keywords and
# Line 83  NIL if not found." Line 71  NIL if not found."
71  to use CLHP. See README for an example."  to use CLHP. See README for an example."
72    (use-package :cgi)    (use-package :cgi)
73    (use-package :clhp)    (use-package :clhp)
74    (cgi:init)    (init)
75    (cgi:header :content-type    (header :content-type
76                :text/html                :text/html
77                :extra                :extra
78                '(#.(format                '(#.(format

Legend:
Removed from v.1.16  
changed lines
  Added in v.1.17

  ViewVC Help
Powered by ViewVC 1.1.5