diff --git a/src/component/form.lisp b/src/component/form.lisp index d93ceb8..48beae2 100644 --- a/src/component/form.lisp +++ b/src/component/form.lisp @@ -63,6 +63,8 @@ (in-package :dev.metalisp.sbt/component/form) +;;; checkable + (defvar checkable-elements '("radio" "checkbox") "List of checkable specific input elements ") @@ -118,6 +120,8 @@ checkable macros." (define-checkables) +;;; ctrl + (defvar ctrl-elements '("button" "checkbox" "color" "date" "datetime-local" "email" "file" "hidden" "image" "month" "number" "password" "radio" "range" "reset" "search" "submit" @@ -182,6 +186,8 @@ checkable macros." (define-ctrls) +;;; combo + (defmacro combo ((&key size multiple) &body body) "This macro generates a Bootstrap select dropdown menu. @@ -235,6 +241,8 @@ macros." (define-combos) +;;; other + (defun search-form () "This function generates a general-purpose search form.