mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2025-12-06 02:30:42 -08:00
Code Issues Projects Releases Wiki Activity

Docs added

Browse source
This commit is contained in:
David Botton 2021-01-20 14:42:41 -05:00
parent 4764592c05
commit 85788d1b22
9 changed files with 315 additions and 127 deletions
Download patch file Download diff file Expand all files Collapse all files

2
FAQ
View file

@ -4,7 +4,7 @@ A) If running a tutorial or demo:
Did you start the application / emacs and slime in the directory of clog?
By default that is /common-lisp/clog?
Or you can use (defparameter clog::*overide-static-root* #P"~/common-lisp/clog/static-files/")
Or you can use (setf clog::*overide-static-root* #P"~/common-lisp/clog/static-files/")
to overide the static path in (clog:initialize)
If running your own app. Make sure the :static-file key is set correctly on (clog:initialize)

27
README.md
View file

@ -40,7 +40,6 @@ an active soft realtime connection. For most CLOG applications all
programming logic, events and decisions are done on the server
which can be local or remote over the web.
CLOG is developed on an M1 MacBook with ECL, it is tested fairly
regulary with SCBL on Linux, Windows and Intel MacBook. It should
in theory work on any system QuickLisp and CLACK will load on to.
@ -49,9 +48,10 @@ CLOG will be in QuickSlip in the next update, but a good idea,
since I am still adding code daily, is to cloan the github repo
in to your ~/common-lisp directory:
```
cd ~/common-lisp
git clone https://github.com/rabbibotton/clog.git
```
To load this package and work through tutorials (assuming you
have QuickSlip configured):
@ -119,6 +119,29 @@ Here is a sample CLOG app:
(open-browser))
```
Work in progress:
(Add an enhacement request if want to see some feature specificly not
covered yet.)
Tutorial Summary
- 01-tutorial.lisp - Hello World
- 02-tutorial.lisp - Closures in CLOG
- 03-tutorial.lisp - Events fire in parallel
- 05-tutorial.lisp - The event target, reusing event handlers
- 05-tutorial.lisp - Using connection-data-item
- 06-tutorial.lisp - Tasking and events
- 07-tutorial.lisp - My first CLOG video game (and handling disconnects)
- 08-tutorial.lisp - Mice Love Containers
- 09-tutorial.lisp - Tabs, pannels and forms
- 10-tutorial.lisp - Canvas
- 11-tutorial.lisp - Attaching to existing HTML
- 12-tutorial.lisp - Running a website in CLOG (routing)
Demo Summary
- 01-snake-game.lisp - Sparkey the Snake Game
Enhancements being worked on now:

81
clog-docs.lisp Normal file
View file

@ -0,0 +1,81 @@
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;; CLOG - The Common Lisp Omnificent GUI ;;;;
;;;; (c) 2020-2021 David Botton ;;;;
;;;; License BSD 3 Clause ;;;;
;;;; ;;;;
;;;; clog-docs.lisp ;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(in-package :clog)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Exports - clog documentation sections
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defsection @clog-getting-started (:title "CLOG Getting Started")
"
# CLOG - The Common Lisp Omnificent GUI
## David Botton <david@botton.com>
### License BSD 3-Clause License
The Common Lisp Omnificient GUI, CLOG for short, uses web technology to
produce graphical user interfaces for applications locally or remotely.
CLOG can take the place, or work along side, most cross platform GUI
frameworks and website frameworks. The CLOG package starts up the
connectivity to the browser or other websocket client (often a browser
embedded in a native template application.)
STATUS: CLOG is complete enough for most uses, there are a few loose
ends (multimedia, client side storage, integrations with databases),
but CLOG is actually based on a framework I wrote for Ada, GNOGA, in
2013 and used in commercial production code for the last 6 years,
i.e. the techiniques it uses are solid and proven.
Some of the things CLOG can be used for:
* Cross platform GUIs and Reports
* Secure websites and complex interactive web applications
* Write mobile software
* Write massive multiplayer online games
* Monitoring software for embedded systems
* A fun way to teaching programming and advanced multi-tasking
parallel programming techniques. (CLOG is a parallel GUI)
* And the list goes on
The key to CLOG is the relationship it forms with a Browser window
or Browser control compiled to native code. CLOG uses websockets
for communications and the browser to render a GUI that maintanes
an active soft realtime connection. For most CLOG applications all
programming logic, events and decisions are done on the server
which can be local or remote over the web.
CLOG is developed on an M1 MacBook with ECL, it is tested fairly
regulary with SCBL on Linux, Windows and Intel MacBook. It should
in theory work on any system QuickLisp and CLACK will load on to.
CLOG will be in QuickSlip in the next update, but a good idea,
since I am still adding code daily, is to cloan the github repo
in to your ~/common-lisp directory:
```
cd ~/common-lisp
git clone https://github.com/rabbibotton/clog.git
```
To load this package and work through tutorials (assuming you
have QuickSlip configured):
1. cd to the CLOG dir (the dir should be one used by QuickLisp ex. ~/common-lisp/)
2. Start emacs/slime or your common lisp \"repl\" in _that_ directory.
3. In the REPL run:
CL-USER> (ql:quickload :clog)
CL-USER> (load \"~/common-lisp/clog/tutorial/01-tutorial.lisp\")
CL-USER> (clog-user:start-tutorial)
Work your way through the tutorials. You will see how quick and easy it is
to be a CLOGer.
")

25
clog-element.lisp
View file

@ -1632,6 +1632,19 @@ A list of standard cursor types can be found at:
(defmethod click ((obj clog-element))
(jquery-execute obj "click()"))
;;;;;;;;;;;;;;;;;;;;
;; parent-element ;;
;;;;;;;;;;;;;;;;;;;;
(defgeneric parent-element (clog-element)
(:documentation "Return a new clog-element represeting the parent of
CLOG-ELEMENT."))
(defmethod parent-element ((obj clog-element))
(attach-as-child obj (jquery-execute obj (format nil "parent().attr('id');"))))
;;;;;;;;;;;;;;;;;
;; first-child ;;
;;;;;;;;;;;;;;;;;
@ -1656,3 +1669,15 @@ to no actual HTML elemen."))
(defmethod next-sibling ((obj clog-element))
(attach-as-child obj (jquery-execute obj (format nil "next().attr('id');"))))
;;;;;;;;;;;;;;;;;;;;;;
;; previous-sibling ;;
;;;;;;;;;;;;;;;;;;;;;;
(defgeneric previous-sibling (clog-element)
(:documentation "Traverse to previous sibling element. If Child does not have an
html id than Element_Type will have an ID of undefined and therefore attached
to no actual HTML elemen."))
(defmethod previous-sibling ((obj clog-element))
(attach-as-child obj (jquery-execute obj (format nil "previous().attr('id');"))))

2
clog-system.lisp
View file

@ -18,6 +18,8 @@
(defvar *clog-running* nil "If clog running.")
(defvar *overide-static-root* nil "Overide the static-root settings.")
;;;;;;;;;;;;;;;;
;; initialize ;;
;;;;;;;;;;;;;;;;

1
clog.asd
View file

@ -13,6 +13,7 @@
#:mgl-pax #:quri)
:components ((:file "clog-connection")
(:file "clog")
(:file "clog-docs")
(:file "clog-system")
(:file "clog-utilities")
(:file "clog-base")

38
clog.lisp
View file

@ -12,20 +12,21 @@
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(mgl-pax:define-package :clog
(:documentation "The Common List Omnificent GUI - Parent package")
(:documentation "The Common List Omnificent GUI - CLOG")
(:local-nicknames (:cc :clog-connection))
(:use #:cl #:mgl-pax))
(in-package :clog)
(defsection @clog-manual (:title "The CLOG manual")
"The Common Lisp Omnificient GUI, CLOG for short, uses web technology
to produce graphical user interfaces for applications locally or
remotely. The CLOG package starts up the connectivity to the browser
or other websocket client (often a browser embedded in a native
application."
"The Common Lisp Omnificient GUI, CLOG for short, uses web technology to
produce graphical user interfaces for applications locally or remotely.
CLOG can take the place, or work along side, most cross platform GUI
frameworks and website frameworks. The CLOG package starts up the
connectivity to the browser or other websocket client (often a browser
embedded in a native template application.)"
(clog asdf:system)
(@clog-getting-started section)
(@clog-system section)
(@clog-utilities section)
@ -113,14 +114,14 @@ application."
;; need to add drag and drop events
(defsection @clog-element (:title "CLOG Elements")
"CLOG-Element - Base class for CLOG Elements"
"CLOG-Element - Class for CLOG Elements"
(clog-element class)
"CLOG-Element - Low Level Creation"
(create-child generic-function)
(attach-as-child generic-function)
"CLOG-Element - Placement"
"CLOG-Element - DOM Placement"
(place-after generic-function)
(place-before generic-function)
(place-inside-top-of generic-function)
@ -239,8 +240,10 @@ application."
(remove-from-dom generic-function)
(click generic-function)
"CLOG-Element - Traversal Methods"
"CLOG-Element - DOM Traversal Methods"
(parent-element generic-function)
(first-child generic-function)
(previous-sibling generic-function)
(next-sibling generic-function))
(defsection @clog-element-common (:title "Common CLOG Elements")
@ -259,12 +262,12 @@ application."
(create-button generic-function)
(disabledp generic-function)
"CLOG-IMG - Class for CLOG Imgs"
"CLOG-IMG - Class for CLOG Images"
(clog-img class)
(create-img generic-function)
(url-src generic-function)
"CLOG-Div - Class for CLOG Divs"
"CLOG-Div - Class for CLOG Div Blocks"
(clog-div class)
(create-div generic-function)
@ -292,7 +295,7 @@ application."
(clog-p class)
(create-p generic-function)
"CLOG-Span - Class for CLOG Spans"
"CLOG-Span - Class for CLOG Inline Spans"
(clog-span class)
(create-span generic-function))
@ -308,6 +311,11 @@ application."
(encoding generic-function)
(validate-on-submit generic-function)
"CLOG-Fieldset - Class for CLOG Fieldsets"
(clog-fieldset class)
(create-fieldset generic-function)
"CLOG-Form-Element - Class for form elements"
(clog-form-element class)
(form-element-type type)
@ -346,10 +354,6 @@ application."
(create-label generic-function)
(label-for generic-function)
"CLOG-Fieldset - Class for CLOG Fieldsets"
(clog-fieldset class)
(create-fieldset generic-function)
"CLOG-Select - Class for CLOG Selects"
(clog-select class)
(create-select generic-function)

2
demos/README.md
View file

@ -34,4 +34,4 @@ Most demos startup a browser, if not use http://127.0.0.1:8080
Demo Summary
- 01-snake-game.lisp - Snake Gamey
- 01-snake-game.lisp - Sparkey the Snake Game

234
doc/clog-manual.html
View file

@ -27,14 +27,14 @@
<div id="content">
<p><a id='x-28CLOG-3A-40CLOG-MANUAL-20MGL-PAX-3ASECTION-29'></a></p>
<p><span class="outer-navigation"><span class="navigation"> <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)">&#8594;</a> <a href="#x-28CLOG-3A-40CLOG-MANUAL-20MGL-PAX-3ASECTION-29" title="The CLOG manual">&#8634;</a></span></span></p>
<p><span class="outer-navigation"><span class="navigation"> <a href="#x-28CLOG-3A-40CLOG-GETTING-STARTED-20MGL-PAX-3ASECTION-29" title="CLOG Getting Started">&#8594;</a> <a href="#x-28CLOG-3A-40CLOG-MANUAL-20MGL-PAX-3ASECTION-29" title="The CLOG manual">&#8634;</a></span></span></p>
<h1><a href="#x-28CLOG-3A-40CLOG-MANUAL-20MGL-PAX-3ASECTION-29">The CLOG manual</a></h1>
<h2>Table of Contents</h2>
<ul>
<li><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)">1 clog ASDF System Details</a></li>
<li><a href="#x-28CLOG-3A-40CLOG-GETTING-STARTED-20MGL-PAX-3ASECTION-29" title="CLOG Getting Started">1 CLOG Getting Started</a></li>
<li><a href="#x-28CLOG-3A-40CLOG-SYSTEM-20MGL-PAX-3ASECTION-29" title="CLOG System">2 CLOG System</a></li>
<li><a href="#x-28CLOG-3A-40CLOG-UTILITIES-20MGL-PAX-3ASECTION-29" title="CLOG Utilities">3 CLOG Utilities</a></li>
<li><a href="#x-28CLOG-3A-40CLOG-OBJ-20MGL-PAX-3ASECTION-29" title="CLOG Objects">4 CLOG Objects</a></li>
@ -51,41 +51,74 @@
<h6>[in package CLOG]</h6>
<p>The Common Lisp Omnificient GUI, <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> for short, uses web technology
to produce graphical user interfaces for applications locally or
remotely. The <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> package starts up the connectivity to the browser
or other websocket client (often a browser embedded in a native
application.</p>
<p>The Common Lisp Omnificient GUI, <code>CLOG</code> for short, uses web technology to
produce graphical user interfaces for applications locally or remotely.
<code>CLOG</code> can take the place, or work along side, most cross platform GUI
frameworks and website frameworks. The <code>CLOG</code> package starts up the
connectivity to the browser or other websocket client (often a browser
embedded in a native template application.)</p>
<p><a id='x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29'></a></p>
<p><a id='x-28CLOG-3A-40CLOG-GETTING-STARTED-20MGL-PAX-3ASECTION-29'></a></p>
<p><span class="outer-navigation"><span class="navigation"> <a href="#x-28CLOG-3A-40CLOG-MANUAL-20MGL-PAX-3ASECTION-29" title="The CLOG manual">&#8592;</a> <a href="#x-28CLOG-3A-40CLOG-MANUAL-20MGL-PAX-3ASECTION-29" title="The CLOG manual">&#8593;</a> <a href="#x-28CLOG-3A-40CLOG-SYSTEM-20MGL-PAX-3ASECTION-29" title="CLOG System">&#8594;</a> <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)">&#8634;</a></span></span></p>
<p><span class="outer-navigation"><span class="navigation"> <a href="#x-28CLOG-3A-40CLOG-MANUAL-20MGL-PAX-3ASECTION-29" title="The CLOG manual">&#8592;</a> <a href="#x-28CLOG-3A-40CLOG-MANUAL-20MGL-PAX-3ASECTION-29" title="The CLOG manual">&#8593;</a> <a href="#x-28CLOG-3A-40CLOG-SYSTEM-20MGL-PAX-3ASECTION-29" title="CLOG System">&#8594;</a> <a href="#x-28CLOG-3A-40CLOG-GETTING-STARTED-20MGL-PAX-3ASECTION-29" title="CLOG Getting Started">&#8634;</a></span></span></p>
<h2><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29">1 clog ASDF System Details</a></h2>
<h2><a href="#x-28CLOG-3A-40CLOG-GETTING-STARTED-20MGL-PAX-3ASECTION-29">1 CLOG Getting Started</a></h2>
<h1><code>CLOG</code> - The Common Lisp Omnificent GUI</h1>
<h2>David Botton <a href="m&#x61;&#105;l&#x74;&#111;:&#x64;&#97;v&#x69;&#100;@&#x62;&#111;t&#x74;&#111;n&#x2E;&#99;o&#x6D;">m&#x61;&#105;l&#x74;&#111;:&#x64;&#97;v&#x69;&#100;@&#x62;&#111;t&#x74;&#111;n&#x2E;&#99;o&#x6D;</a></h2>
<h3>License BSD 3-Clause License</h3>
<p>The Common Lisp Omnificient GUI, <code>CLOG</code> for short, uses web technology to
produce graphical user interfaces for applications locally or remotely.
<code>CLOG</code> can take the place, or work along side, most cross platform GUI
frameworks and website frameworks. The <code>CLOG</code> package starts up the
connectivity to the browser or other websocket client (often a browser
embedded in a native template application.)</p>
<p>STATUS: <code>CLOG</code> is complete enough for most uses, there are a few loose
ends (multimedia, client side storage, integrations with databases),
but <code>CLOG</code> is actually based on a framework I wrote for Ada, GNOGA, in
2013 and used in commercial production code for the last 6 years,
i.e. the techiniques it uses are solid and proven.</p>
<p>Some of the things <code>CLOG</code> can be used for:</p>
<ul>
<li>Version: 0.1.1</li>
<li>Description: The Common Lisp Omnificent GUI</li>
<li>Licence: BSD</li>
<li>Author: David Botton <a href="m&#x61;&#105;l&#x74;&#111;:&#x64;&#97;v&#x69;&#100;@&#x62;&#111;t&#x74;&#111;n&#x2E;&#99;o&#x6D;">m&#x61;&#105;l&#x74;&#111;:&#x64;&#97;v&#x69;&#100;@&#x62;&#111;t&#x74;&#111;n&#x2E;&#99;o&#x6D;</a></li>
<li><p>Cross platform GUIs and Reports</p></li>
<li><p>Secure websites and complex interactive web applications</p></li>
<li><p>Write mobile software</p></li>
<li><p>Write massive multiplayer online games</p></li>
<li><p>Monitoring software for embedded systems</p></li>
<li><p>A fun way to teaching programming and advanced multi-tasking
parallel programming techniques. (<code>CLOG</code> is a parallel GUI)</p></li>
<li><p>And the list goes on</p></li>
</ul>
<p>The key to <code>CLOG</code> is the relationship it forms with a Browser window
or Browser control compiled to native code. <code>CLOG</code> uses websockets
for communications and the browser to render a GUI that maintanes
an active soft realtime connection. For most <code>CLOG</code> applications all
programming logic, events and decisions are done on the server
which can be local or remote over the web.</p>
<p><a id='x-28CLOG-3A-40CLOG-SYSTEM-20MGL-PAX-3ASECTION-29'></a></p>
<p><span class="outer-navigation"><span class="navigation"> <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)">&#8592;</a> <a href="#x-28CLOG-3A-40CLOG-MANUAL-20MGL-PAX-3ASECTION-29" title="The CLOG manual">&#8593;</a> <a href="#x-28CLOG-3A-40CLOG-UTILITIES-20MGL-PAX-3ASECTION-29" title="CLOG Utilities">&#8594;</a> <a href="#x-28CLOG-3A-40CLOG-SYSTEM-20MGL-PAX-3ASECTION-29" title="CLOG System">&#8634;</a></span></span></p>
<p><span class="outer-navigation"><span class="navigation"> <a href="#x-28CLOG-3A-40CLOG-GETTING-STARTED-20MGL-PAX-3ASECTION-29" title="CLOG Getting Started">&#8592;</a> <a href="#x-28CLOG-3A-40CLOG-MANUAL-20MGL-PAX-3ASECTION-29" title="The CLOG manual">&#8593;</a> <a href="#x-28CLOG-3A-40CLOG-UTILITIES-20MGL-PAX-3ASECTION-29" title="CLOG Utilities">&#8594;</a> <a href="#x-28CLOG-3A-40CLOG-SYSTEM-20MGL-PAX-3ASECTION-29" title="CLOG System">&#8634;</a></span></span></p>
<h2><a href="#x-28CLOG-3A-40CLOG-SYSTEM-20MGL-PAX-3ASECTION-29">2 CLOG System</a></h2>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Startup and Shutdown</p>
<p><code>CLOG</code> Startup and Shutdown</p>
<p><a id='x-28CLOG-3AINITIALIZE-20FUNCTION-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[function]</span> <span class="reference-object"><a href="#x-28CLOG-3AINITIALIZE-20FUNCTION-29" >INITIALIZE</a></span></span> <span class="locative-args">ON-NEW-WINDOW-HANDLER &amp;KEY (HOST &quot;0.0.0.0&quot;) (PORT 8080) (BOOT-FILE &quot;/boot.html&quot;) (STATIC-ROOT #P&quot;static-files/&quot;)</span></span></p>
<p>Inititalize <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> on a socket using <code>HOST</code> and <code>PORT</code> to serve <code>BOOT-FILE</code> as
<p>Inititalize <code>CLOG</code> on a socket using <code>HOST</code> and <code>PORT</code> to serve <code>BOOT-FILE</code> as
the default route to establish web-socket connections and static files
located at <code>STATIC-ROOT</code>. If <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> was already initialized and not shut
located at <code>STATIC-ROOT</code>. If <code>CLOG</code> was already initialized and not shut
down, this function does the same as set-on-new-window. If the variable
clog:<em>overide-static-root</em> is set <code>STATIC-ROOT</code> will be ignored. If <code>BOOT-FILE</code>
is nil no default boot-file will be set for /.</p></li>
@ -108,7 +141,7 @@ function. If <code>BOOT-FILE</code> is nil path is removed.</p></li>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[function]</span> <span class="reference-object"><a href="#x-28CLOG-3ASHUTDOWN-20FUNCTION-29" >SHUTDOWN</a></span></span> <span class="locative-args"></span></span></p>
<p>Shutdown <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a>.</p></li>
<p>Shutdown <code>CLOG</code>.</p></li>
</ul>
<p><a id='x-28CLOG-3A-40CLOG-UTILITIES-20MGL-PAX-3ASECTION-29'></a></p>
@ -117,7 +150,7 @@ function. If <code>BOOT-FILE</code> is nil path is removed.</p></li>
<h2><a href="#x-28CLOG-3A-40CLOG-UTILITIES-20MGL-PAX-3ASECTION-29">3 CLOG Utilities</a></h2>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> utilities</p>
<p><code>CLOG</code> utilities</p>
<p><a id='x-28CLOG-3AJS-TRUE-P-20FUNCTION-29'></a></p>
@ -173,14 +206,14 @@ function. If <code>BOOT-FILE</code> is nil path is removed.</p></li>
<h2><a href="#x-28CLOG-3A-40CLOG-OBJ-20MGL-PAX-3ASECTION-29">4 CLOG Objects</a></h2>
<p>CLOG-Obj - Base class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Objects</p>
<p>CLOG-Obj - Base class for <code>CLOG</code> Objects</p>
<p><a id='x-28CLOG-3ACLOG-OBJ-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-OBJ-20CLASS-29" >CLOG-OBJ</a></span></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> objects (clog-obj) encapsulate the connection between
<p><code>CLOG</code> objects (clog-obj) encapsulate the connection between
lisp and the <code>HTML</code> DOM element.</p></li>
</ul>
@ -598,14 +631,14 @@ is nil unbind the event.</p></li>
<h2><a href="#x-28CLOG-3A-40CLOG-ELEMENT-20MGL-PAX-3ASECTION-29">5 CLOG Elements</a></h2>
<p>CLOG-Element - Base class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Elements</p>
<p>CLOG-Element - Class for <code>CLOG</code> Elements</p>
<p><a id='x-28CLOG-3ACLOG-ELEMENT-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" >CLOG-ELEMENT</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-OBJ-20CLASS-29" title="(CLOG:CLOG-OBJ CLASS)">CLOG-OBJ</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Element Objects is the base class for all html
<p><code>CLOG</code> Element Objects is the base class for all html
element objects.</p></li>
</ul>
@ -630,7 +663,7 @@ as child of <code>CLOG-OBJ</code> and if <code>:AUTO-PLACE</code> (default t) pl
attach an existing element with <code>HTML-ID</code>. The <code>HTML-ID</code> must be unique.</p></li>
</ul>
<p>CLOG-Element - Placement</p>
<p>CLOG-Element - DOM Placement</p>
<p><a id='x-28CLOG-3APLACE-AFTER-20GENERIC-FUNCTION-29'></a></p>
@ -784,9 +817,9 @@ setting display (None).</p></li>
<p>Get/Setf inner-html. This will completely replace the inner
html of an element. This will remove any Elements within Element from the DOM.
If those elements were created in <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> they are still available and can be
If those elements were created in <code>CLOG</code> they are still available and can be
placed in the DOM again using the placement methods. However if they were
created through html writes or otherwise not assigned an ID by <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a>, they are
created through html writes or otherwise not assigned an ID by <code>CLOG</code>, they are
lost forever.</p></li>
</ul>
@ -1572,7 +1605,16 @@ A list of standard cursor types can be found at:
<p>simulate click.</p></li>
</ul>
<p>CLOG-Element - Traversal Methods</p>
<p>CLOG-Element - DOM Traversal Methods</p>
<p><a id='x-28CLOG-3APARENT-ELEMENT-20GENERIC-FUNCTION-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3APARENT-ELEMENT-20GENERIC-FUNCTION-29" >PARENT-ELEMENT</a></span></span> <span class="locative-args">CLOG-ELEMENT</span></span></p>
<p>Return a new clog-element represeting the parent of
<code>CLOG-ELEMENT</code>.</p></li>
</ul>
<p><a id='x-28CLOG-3AFIRST-CHILD-20GENERIC-FUNCTION-29'></a></p>
@ -1584,6 +1626,16 @@ html id than Element_Type will have an ID of undefined and therefore attached
to no actual <code>HTML</code> elemen.</p></li>
</ul>
<p><a id='x-28CLOG-3APREVIOUS-SIBLING-20GENERIC-FUNCTION-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3APREVIOUS-SIBLING-20GENERIC-FUNCTION-29" >PREVIOUS-SIBLING</a></span></span> <span class="locative-args">CLOG-ELEMENT</span></span></p>
<p>Traverse to previous sibling element. If Child does not have an
html id than Element_Type will have an ID of undefined and therefore attached
to no actual <code>HTML</code> elemen.</p></li>
</ul>
<p><a id='x-28CLOG-3ANEXT-SIBLING-20GENERIC-FUNCTION-29'></a></p>
<ul>
@ -1600,14 +1652,14 @@ to no actual <code>HTML</code> elemen.</p></li>
<h2><a href="#x-28CLOG-3A-40CLOG-ELEMENT-COMMON-20MGL-PAX-3ASECTION-29">6 Common CLOG Elements</a></h2>
<p><a href="#x-28CLOG-3ACLOG-A-20CLASS-29" title="(CLOG:CLOG-A CLASS)"><code>CLOG-A</code></a> - Class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Anchors</p>
<p><a href="#x-28CLOG-3ACLOG-A-20CLASS-29" title="(CLOG:CLOG-A CLASS)"><code>CLOG-A</code></a> - Class for <code>CLOG</code> Anchors</p>
<p><a id='x-28CLOG-3ACLOG-A-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-A-20CLASS-29" >CLOG-A</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> A, anchor, Objects.</p></li>
<p><code>CLOG</code> A, anchor, Objects.</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-A-20GENERIC-FUNCTION-29'></a></p>
@ -1642,14 +1694,14 @@ place-inside-bottom-of <code>CLOG-OBJ</code>.</p>
<p>Get/Setf the link target of the anchor.</p></li>
</ul>
<p><a href="#x-28CLOG-3ACLOG-BR-20CLASS-29" title="(CLOG:CLOG-BR CLASS)"><code>CLOG-BR</code></a> - Class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Line Breaks</p>
<p><a href="#x-28CLOG-3ACLOG-BR-20CLASS-29" title="(CLOG:CLOG-BR CLASS)"><code>CLOG-BR</code></a> - Class for <code>CLOG</code> Line Breaks</p>
<p><a id='x-28CLOG-3ACLOG-BR-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-BR-20CLASS-29" >CLOG-BR</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> BR Objects for line breaks.</p></li>
<p><code>CLOG</code> BR Objects for line breaks.</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-BR-20GENERIC-FUNCTION-29'></a></p>
@ -1661,14 +1713,14 @@ place-inside-bottom-of <code>CLOG-OBJ</code>.</p>
line break and if <code>:AUTO-PLACE</code> (default t) place-inside-bottom-of <code>CLOG-OBJ</code></p></li>
</ul>
<p><a href="#x-28CLOG-3ACLOG-BUTTON-20CLASS-29" title="(CLOG:CLOG-BUTTON CLASS)"><code>CLOG-BUTTON</code></a> - Class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Buttons</p>
<p><a href="#x-28CLOG-3ACLOG-BUTTON-20CLASS-29" title="(CLOG:CLOG-BUTTON CLASS)"><code>CLOG-BUTTON</code></a> - Class for <code>CLOG</code> Buttons</p>
<p><a id='x-28CLOG-3ACLOG-BUTTON-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-BUTTON-20CLASS-29" >CLOG-BUTTON</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Button Objects.</p></li>
<p><code>CLOG</code> Button Objects.</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-BUTTON-20GENERIC-FUNCTION-29'></a></p>
@ -1689,14 +1741,14 @@ line break and if <code>:AUTO-PLACE</code> (default t) place-inside-bottom-of <c
<p>Get/Setf form element disabledp.</p></li>
</ul>
<p><a href="#x-28CLOG-3ACLOG-IMG-20CLASS-29" title="(CLOG:CLOG-IMG CLASS)"><code>CLOG-IMG</code></a> - Class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Imgs</p>
<p><a href="#x-28CLOG-3ACLOG-IMG-20CLASS-29" title="(CLOG:CLOG-IMG CLASS)"><code>CLOG-IMG</code></a> - Class for <code>CLOG</code> Images</p>
<p><a id='x-28CLOG-3ACLOG-IMG-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-IMG-20CLASS-29" >CLOG-IMG</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Img Objects.</p></li>
<p><code>CLOG</code> Img Objects.</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-IMG-20GENERIC-FUNCTION-29'></a></p>
@ -1718,14 +1770,14 @@ placing image to constrain image size.</p></li>
<p>Get/Setf the url-src of the img.</p></li>
</ul>
<p>CLOG-Div - Class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Divs</p>
<p>CLOG-Div - Class for <code>CLOG</code> Div Blocks</p>
<p><a id='x-28CLOG-3ACLOG-DIV-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-DIV-20CLASS-29" >CLOG-DIV</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Div Objects.</p></li>
<p><code>CLOG</code> Div Objects.</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-DIV-20GENERIC-FUNCTION-29'></a></p>
@ -1738,14 +1790,14 @@ placing image to constrain image size.</p></li>
<code>CLOG-OBJ</code></p></li>
</ul>
<p><a href="#x-28CLOG-3ACLOG-HR-20CLASS-29" title="(CLOG:CLOG-HR CLASS)"><code>CLOG-HR</code></a> - Class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Hortizontal Rules</p>
<p><a href="#x-28CLOG-3ACLOG-HR-20CLASS-29" title="(CLOG:CLOG-HR CLASS)"><code>CLOG-HR</code></a> - Class for <code>CLOG</code> Hortizontal Rules</p>
<p><a id='x-28CLOG-3ACLOG-HR-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-HR-20CLASS-29" >CLOG-HR</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> HR Objects for horizontal rules.</p></li>
<p><code>CLOG</code> HR Objects for horizontal rules.</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-HR-20GENERIC-FUNCTION-29'></a></p>
@ -1758,14 +1810,14 @@ horizontal rule (line) and if <code>:AUTO-PLACE</code> (default t) place-inside-
<code>CLOG-OBJ</code></p></li>
</ul>
<p>CLOG-Meter - Class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Meters</p>
<p>CLOG-Meter - Class for <code>CLOG</code> Meters</p>
<p><a id='x-28CLOG-3ACLOG-METER-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-METER-20CLASS-29" >CLOG-METER</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Meter Objects.</p></li>
<p><code>CLOG</code> Meter Objects.</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-METER-20GENERIC-FUNCTION-29'></a></p>
@ -1829,14 +1881,14 @@ instead through the value property.</p></li>
<p>Get/Setf the optimum of the meter.</p></li>
</ul>
<p>CLOG-Progress-Bar - Class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Progress Bars</p>
<p>CLOG-Progress-Bar - Class for <code>CLOG</code> Progress Bars</p>
<p><a id='x-28CLOG-3ACLOG-PROGRESS-BAR-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-PROGRESS-BAR-20CLASS-29" >CLOG-PROGRESS-BAR</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Progress-Bar Objects.</p></li>
<p><code>CLOG</code> Progress-Bar Objects.</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-PROGRESS-BAR-20GENERIC-FUNCTION-29'></a></p>
@ -1867,14 +1919,14 @@ instead through the value property.</p></li>
<p>Get/Setf form element maximum.</p></li>
</ul>
<p><a href="#x-28CLOG-3ACLOG-P-20CLASS-29" title="(CLOG:CLOG-P CLASS)"><code>CLOG-P</code></a> - Class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Paragraphs</p>
<p><a href="#x-28CLOG-3ACLOG-P-20CLASS-29" title="(CLOG:CLOG-P CLASS)"><code>CLOG-P</code></a> - Class for <code>CLOG</code> Paragraphs</p>
<p><a id='x-28CLOG-3ACLOG-P-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-P-20CLASS-29" >CLOG-P</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> P Objects.</p></li>
<p><code>CLOG</code> P Objects.</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-P-20GENERIC-FUNCTION-29'></a></p>
@ -1887,14 +1939,14 @@ instead through the value property.</p></li>
<code>CLOG-OBJ</code></p></li>
</ul>
<p>CLOG-Span - Class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Spans</p>
<p>CLOG-Span - Class for <code>CLOG</code> Inline Spans</p>
<p><a id='x-28CLOG-3ACLOG-SPAN-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-SPAN-20CLASS-29" >CLOG-SPAN</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Span Objects.</p></li>
<p><code>CLOG</code> Span Objects.</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-SPAN-20GENERIC-FUNCTION-29'></a></p>
@ -1920,7 +1972,7 @@ and if <code>:AUTO-PLACE</code> (default t) place-inside-bottom-of
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-FORM-20CLASS-29" >CLOG-FORM</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Form Objecs is the base class for all html forms.</p></li>
<p><code>CLOG</code> Form Objecs is the base class for all html forms.</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-FORM-20GENERIC-FUNCTION-29'></a></p>
@ -1930,7 +1982,7 @@ and if <code>:AUTO-PLACE</code> (default t) place-inside-bottom-of
<p>Create a new CLOG-Form as child of <code>CLOG-OBJ</code> that organizes
a collection of form elements in to a single form if <code>:AUTO-PLACE</code> (default t)
place-inside-bottom-of <code>CLOG-OBJ</code>. In <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> a form's on-submit handler should be
place-inside-bottom-of <code>CLOG-OBJ</code>. In <code>CLOG</code> a form's on-submit handler should be
set and the form element values handled in that handler as opposed to the
<code>HTML</code> model of submitting to a new &quot;page&quot;. If though one wishes to submit to
another page can use the <code>:ACTION</code> <code>:METHOD</code> and <code>:TARGET</code> keys and either do not
@ -1989,6 +2041,24 @@ text/plain</p></li>
<p>Get/Setf form validate-on-submit.</p></li>
</ul>
<p>CLOG-Fieldset - Class for <code>CLOG</code> Fieldsets</p>
<p><a id='x-28CLOG-3ACLOG-FIELDSET-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-FIELDSET-20CLASS-29" >CLOG-FIELDSET</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><code>CLOG</code> Form Element Fieldset Object</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-FIELDSET-20GENERIC-FUNCTION-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3ACREATE-FIELDSET-20GENERIC-FUNCTION-29" >CREATE-FIELDSET</a></span></span> <span class="locative-args">CLOG-OBJ &amp;KEY LEGEND</span></span></p>
<p>Create a new clog-fieldset as child of <code>CLOG-OBJ</code>.</p></li>
</ul>
<p>CLOG-Form-Element - Class for form elements</p>
<p><a id='x-28CLOG-3ACLOG-FORM-ELEMENT-20CLASS-29'></a></p>
@ -1996,7 +2066,7 @@ text/plain</p></li>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-FORM-ELEMENT-20CLASS-29" >CLOG-FORM-ELEMENT</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Form Element Object is the base class for all form
<p><code>CLOG</code> Form Element Object is the base class for all form
elements.</p></li>
</ul>
@ -2249,14 +2319,14 @@ virtual keyboards.</p></li>
<p>Get/Setf form element maximum-length.</p></li>
</ul>
<p>CLOG-Label - Class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Labels</p>
<p>CLOG-Label - Class for <code>CLOG</code> Labels</p>
<p><a id='x-28CLOG-3ACLOG-LABEL-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-LABEL-20CLASS-29" >CLOG-LABEL</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Form Element Label Object</p></li>
<p><code>CLOG</code> Form Element Label Object</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-LABEL-20GENERIC-FUNCTION-29'></a></p>
@ -2275,32 +2345,14 @@ virtual keyboards.</p></li>
<p>Set label is for <code>ELEMENT</code>.</p></li>
</ul>
<p>CLOG-Fieldset - Class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Fieldsets</p>
<p><a id='x-28CLOG-3ACLOG-FIELDSET-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-FIELDSET-20CLASS-29" >CLOG-FIELDSET</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Form Element Fieldset Object</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-FIELDSET-20GENERIC-FUNCTION-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3ACREATE-FIELDSET-20GENERIC-FUNCTION-29" >CREATE-FIELDSET</a></span></span> <span class="locative-args">CLOG-OBJ &amp;KEY LEGEND</span></span></p>
<p>Create a new clog-fieldset as child of <code>CLOG-OBJ</code>.</p></li>
</ul>
<p>CLOG-Select - Class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Selects</p>
<p>CLOG-Select - Class for <code>CLOG</code> Selects</p>
<p><a id='x-28CLOG-3ACLOG-SELECT-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-SELECT-20CLASS-29" >CLOG-SELECT</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-FORM-ELEMENT-20CLASS-29" title="(CLOG:CLOG-FORM-ELEMENT CLASS)">CLOG-FORM-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Form Element Select Options Object</p></li>
<p><code>CLOG</code> Form Element Select Options Object</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-SELECT-20GENERIC-FUNCTION-29'></a></p>
@ -2316,7 +2368,7 @@ virtual keyboards.</p></li>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-OPTION-20CLASS-29" >CLOG-OPTION</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-FORM-ELEMENT-20CLASS-29" title="(CLOG:CLOG-FORM-ELEMENT CLASS)">CLOG-FORM-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Form Element Option for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Select Object</p></li>
<p><code>CLOG</code> Form Element Option for <code>CLOG</code> Select Object</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-OPTION-20GENERIC-FUNCTION-29'></a></p>
@ -2332,7 +2384,7 @@ virtual keyboards.</p></li>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-OPTGROUP-20CLASS-29" >CLOG-OPTGROUP</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-FORM-ELEMENT-20CLASS-29" title="(CLOG:CLOG-FORM-ELEMENT CLASS)">CLOG-FORM-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Form Element Optgroup for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Select Object</p></li>
<p><code>CLOG</code> Form Element Optgroup for <code>CLOG</code> Select Object</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-OPTGROUP-20GENERIC-FUNCTION-29'></a></p>
@ -2367,14 +2419,14 @@ virtual keyboards.</p></li>
<p>Add group of options to select.</p></li>
</ul>
<p>CLOG-Data-List - Class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Option Data Lists</p>
<p>CLOG-Data-List - Class for <code>CLOG</code> Option Data Lists</p>
<p><a id='x-28CLOG-3ACLOG-DATA-LIST-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-DATA-LIST-20CLASS-29" >CLOG-DATA-LIST</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Form Element Data-List Options Object</p></li>
<p><code>CLOG</code> Form Element Data-List Options Object</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-DATA-LIST-20GENERIC-FUNCTION-29'></a></p>
@ -2402,14 +2454,14 @@ optionally fill in with contents of data-list.</p></li>
<p>Add option <a href="#x-28CLOG-3AVALUE-20GENERIC-FUNCTION-29" title="(CLOG:VALUE GENERIC-FUNCTION)"><code>VALUE</code></a> to data-list.</p></li>
</ul>
<p>CLOG-Text-Area - Class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Text Areas</p>
<p>CLOG-Text-Area - Class for <code>CLOG</code> Text Areas</p>
<p><a id='x-28CLOG-3ACLOG-TEXT-AREA-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-TEXT-AREA-20CLASS-29" >CLOG-TEXT-AREA</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-FORM-ELEMENT-20CLASS-29" title="(CLOG:CLOG-FORM-ELEMENT CLASS)">CLOG-FORM-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Form Element Text-Area Object</p></li>
<p><code>CLOG</code> Form Element Text-Area Object</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-TEXT-AREA-20GENERIC-FUNCTION-29'></a></p>
@ -2458,14 +2510,14 @@ optionally fill in with contents of data-list.</p></li>
<h2><a href="#x-28CLOG-3A-40CLOG-CANVAS-20MGL-PAX-3ASECTION-29">8 CLOG Canvas Objects</a></h2>
<p>CLOG-Canvas - Class for <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> canvas objects</p>
<p>CLOG-Canvas - Class for <code>CLOG</code> canvas objects</p>
<p><a id='x-28CLOG-3ACLOG-CANVAS-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-CANVAS-20CLASS-29" >CLOG-CANVAS</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Canvas Objects.</p></li>
<p><code>CLOG</code> Canvas Objects.</p></li>
</ul>
<p><a id='x-28CLOG-3ACREATE-CANVAS-20GENERIC-FUNCTION-29'></a></p>
@ -2806,14 +2858,14 @@ https://developer.mozilla.org/en-US/docs/Web/CSS/font</p></li>
<h2><a href="#x-28CLOG-3A-40CLOG-BODY-20MGL-PAX-3ASECTION-29">9 CLOG Body Objects</a></h2>
<p>CLOG-Body - <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Body Objects</p>
<p>CLOG-Body - <code>CLOG</code> Body Objects</p>
<p><a id='x-28CLOG-3ACLOG-BODY-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-BODY-20CLASS-29" >CLOG-BODY</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-ELEMENT-20CLASS-29" title="(CLOG:CLOG-ELEMENT CLASS)">CLOG-ELEMENT</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Body Object encapsulate the view in the window.</p></li>
<p><code>CLOG</code> Body Object encapsulate the view in the window.</p></li>
</ul>
<p>CLOG-Body - Properties</p>
@ -2866,14 +2918,14 @@ or global objects.</p></li>
<h2><a href="#x-28CLOG-3A-40CLOG-WINDOW-20MGL-PAX-3ASECTION-29">10 CLOG Window Objects</a></h2>
<p>CLOG-Window - <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Window Objects</p>
<p>CLOG-Window - <code>CLOG</code> Window Objects</p>
<p><a id='x-28CLOG-3ACLOG-WINDOW-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-WINDOW-20CLASS-29" >CLOG-WINDOW</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-OBJ-20CLASS-29" title="(CLOG:CLOG-OBJ CLASS)">CLOG-OBJ</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Window Objects encapsulate the window.</p></li>
<p><code>CLOG</code> Window Objects encapsulate the window.</p></li>
</ul>
<p>CLOG-Window - Properties</p>
@ -3176,14 +3228,14 @@ If <code>ON-ORIENTATION-CHANGE-HANDLER</code> is nil unbind the event.</p></li>
<h2><a href="#x-28CLOG-3A-40CLOG-DOCUMENT-20MGL-PAX-3ASECTION-29">11 CLOG Document Objects</a></h2>
<p>CLOG-Document - <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Document Objects</p>
<p>CLOG-Document - <code>CLOG</code> Document Objects</p>
<p><a id='x-28CLOG-3ACLOG-DOCUMENT-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-DOCUMENT-20CLASS-29" >CLOG-DOCUMENT</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-OBJ-20CLASS-29" title="(CLOG:CLOG-OBJ CLASS)">CLOG-OBJ</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Document Objects encapsulate the document.</p></li>
<p><code>CLOG</code> Document Objects encapsulate the document.</p></li>
</ul>
<p><a id='x-28CLOG-3ADOMAIN-20GENERIC-FUNCTION-29'></a></p>
@ -3310,14 +3362,14 @@ If <code>ON-ORIENTATION-CHANGE-HANDLER</code> is nil unbind the event.</p></li>
<h2><a href="#x-28CLOG-3A-40CLOG-LOCATION-20MGL-PAX-3ASECTION-29">12 CLOG Location Objects</a></h2>
<p>CLOG-Location - <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Location Objects</p>
<p>CLOG-Location - <code>CLOG</code> Location Objects</p>
<p><a id='x-28CLOG-3ACLOG-LOCATION-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-LOCATION-20CLASS-29" >CLOG-LOCATION</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-OBJ-20CLASS-29" title="(CLOG:CLOG-OBJ CLASS)">CLOG-OBJ</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Location Objects encapsulate the location.</p></li>
<p><code>CLOG</code> Location Objects encapsulate the location.</p></li>
</ul>
<p>CLOG-Location - Properties</p>
@ -3426,14 +3478,14 @@ If <code>ON-ORIENTATION-CHANGE-HANDLER</code> is nil unbind the event.</p></li>
<h2><a href="#x-28CLOG-3A-40CLOG-NAVIGATOR-20MGL-PAX-3ASECTION-29">13 CLOG Navigator Objects</a></h2>
<p>CLOG-Navigator - <a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Navigator Objects</p>
<p>CLOG-Navigator - <code>CLOG</code> Navigator Objects</p>
<p><a id='x-28CLOG-3ACLOG-NAVIGATOR-20CLASS-29'></a></p>
<ul>
<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[class]</span> <span class="reference-object"><a href="#x-28CLOG-3ACLOG-NAVIGATOR-20CLASS-29" >CLOG-NAVIGATOR</a></span></span> <span class="locative-args"><a href="#x-28CLOG-3ACLOG-OBJ-20CLASS-29" title="(CLOG:CLOG-OBJ CLASS)">CLOG-OBJ</a></span></span></p>
<p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Navigator Objects encapsulate the navigator.</p></li>
<p><code>CLOG</code> Navigator Objects encapsulate the navigator.</p></li>
</ul>
<p>CLOG-Navigator - Properties</p>