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