77a03626b17642df2ab058bd5d530f299c39ac93
[clinton/lisp-on-lines.git] / src / ucw / packages.lisp
1
2 (defpackage lisp-on-lines-ucw
3 (:documentation "An LoL Layer over ucw.basic")
4 (:nicknames #:lol-ucw)
5 (:use #:lisp-on-lines #:ucw :common-lisp :arnesi :yaclml :puri)
6 (:shadow
7 #:standard-window-component
8 #:make-action
9 #:standard-action
10 #:uri-parse-error
11 #:standard-application
12
13 #:call
14 #:answer)
15
16 (:shadowing-import-from :ucw
17 #:parent)
18
19 (:import-from :ucw
20 #:register-action-in-frame
21 #:+action-parameter-name+
22 #:context.current-frame
23 #:uri.query
24 #:*current-component*
25 #:find-action
26 #:service)
27
28 (:export
29
30 ;;; First, LOL-UCW exports. The rest are from UCW.
31 #:lol-component
32
33 #:defcomponent
34
35 #:uri.query
36
37 ;; Standard Server
38 #:standard-server
39 #:startup-server
40 #:shutdown-server
41
42
43 ;; Sessions
44 #:get-session-value
45 ;; Standard Application
46 #:standard-application
47 #:register-application
48 #:service
49
50 ;; Standard Request Context
51 #:*context*
52 #:context.current-frame
53 #:context.window-component
54
55
56 ;; Actions
57 #:call
58 #:answer
59 #:make-action
60 #:find-action
61 #:defaction
62 #:defmethod/cc
63
64 #:call-component
65 #:answer-component
66
67 ;; Entry Points
68 #:defentry-point
69
70 ;; Standard Components
71 #:render
72 #:render-html-body
73 #:component
74
75 #:standard-component-class
76 #:described-component-class
77
78 #:container
79 #:find-component
80
81 #:standard-window-component ;*
82 #:window-body
83 #:info-message
84
85 ))
86
87 (defpackage :lisp-on-lines-tags
88 (:documentation "LoL convience yaclml tags.")
89 (:use)
90 (:nicknames #:<lol)
91 (:export
92 #:component-body
93 #:render-component
94 #:a
95 #:area
96 #:form
97 #:input
98 #:button
99 #:simple-select
100 #:select
101 #:option
102 #:textarea
103
104 #:integer-range-select
105 #:month-day-select
106 #:month-select
107
108 #:text
109 #:password
110 #:submit
111 #:simple-form
112 #:simple-submit
113
114 #:localized
115 #:script))