Reset packages path

src/accordion.lisp

@@ -1,13 +1,13 @@
 ;;;; -*- mode: lisp; coding: utf-8; tab-width: 4; fill-column: 100; indent-tabs-mode: nil; -*-
 ;;;; accordion.lisp
 ;;;; This file defines a package for generating Bootstrap accordion components using Common Lisp macros.
-(defpackage dev.metalisp.sbt/component/accordion
+(defpackage dev.metalisp.sbt/accordion
   (:documentation "A package for generating Bootstrap accordions.")
   (:use :cl)
   (:export
    :accordion))
 
-(in-package :dev.metalisp.sbt/component/accordion)
+(in-package :dev.metalisp.sbt/accordion)
 
 (defmacro accordion ((&key (id "accordionExample") flush) &body body)
   "This macro generates an accordion-style collapsible list.

src/alert.lisp

@@ -3,7 +3,7 @@
 ;;;; This file defines a package for generating Bootstrap alert components
 ;;;; using Common Lisp macros.
 
-(defpackage dev.metalisp.sbt/component/alert
+(defpackage dev.metalisp.sbt/alert
   (:use :cl)
   (:export
    :btn
@@ -25,7 +25,7 @@
    :alert-dismiss-light
    :alert-dismiss-dark))
 
-(in-package :dev.metalisp.sbt/component/alert)
+(in-package :dev.metalisp.sbt/alert)
 
 (defmacro btn ()
   "This macro generates the close button used in a Bootstrap alert when it is set to be dismissible."

src/badge.lisp

@@ -3,7 +3,7 @@
 ;;;; This file constitutes the Common Lisp package for generating Bootstrap badges,
 ;;;; a lightweight and versatile component used to add contextual highlights or emphasis.
 
-(defpackage dev.metalisp.sbt/component/badge
+(defpackage dev.metalisp.sbt/badge
   (:documentation "A package for generating Bootstrap badges.")
   (:use :cl)
   (:export
@@ -27,7 +27,7 @@
    :badge-pill-dark
    :badge-pill-link))
 
-(in-package :dev.metalisp.sbt/component/badge)
+(in-package :dev.metalisp.sbt/badge)
 
 (defmacro badge ((&key (color "primary") (pill nil)) &body body)
   "This macro generates a Bootstrap badge.

src/button.lisp

@@ -3,7 +3,7 @@
 ;;;; This file defines a package for generating Bootstrap button components
 ;;;; using Common Lisp macros.
 
-(defpackage dev.metalisp.sbt/component/btn
+(defpackage dev.metalisp.sbt/btn
   (:use :cl)
   (:export
    :btn
@@ -62,7 +62,7 @@
    :btn-outline-dark-sm
    :btn-outline-link-sm))
 
-(in-package :dev.metalisp.sbt/component/btn)
+(in-package :dev.metalisp.sbt/btn)
 
 (defmacro btn ((&key (id nil) (type "button") (color "primary") (size "")) &body body)
   "This macro generates a Bootstrap button.

src/card.lisp

@@ -29,7 +29,7 @@
 ;; and flexbox, along with optional headers and footers. They offer a lot of
 ;; flexibility and can be used in a wide range of designs and layouts.
 
-(defpackage dev.metalisp.sbt/component/card
+(defpackage dev.metalisp.sbt/card
   (:use :cl)
   (:export
    :title
@@ -44,7 +44,7 @@
    :card-group)
   (:documentation "A Common Lisp package for generating Bootstrap Card components."))
 
-(in-package :dev.metalisp.sbt/component/card)
+(in-package :dev.metalisp.sbt/card)
 
 (defmacro title (&body body)
   "This macro generates a Bootstrap card title.

src/dropdown.lisp

@@ -24,14 +24,14 @@
 ;; class .dropdown-item. Additionally, dropdowns can be made to expand
 ;; upwards (instead of downwards) by adding the .dropup class.
 
-(defpackage dev.metalisp.sbt/component/dropdown
+(defpackage dev.metalisp.sbt/dropdown
   (:use :cl)
   (:export
    :menu
    :item
    :dropdown))
 
-(in-package :dev.metalisp.sbt/component/dropdown)
+(in-package :dev.metalisp.sbt/dropdown)
 
 (defmacro menu (&body body)
   "This macro generates a Bootstrap dropdown menu.

src/form.lisp

@@ -5,7 +5,7 @@
 ;;;; functions, macros, and HTML templates for generating Bootstrap-formatted
 ;;;; forms.
 
-(defpackage dev.metalisp.sbt/component/form
+(defpackage dev.metalisp.sbt/form
   (:use
    :cl)
   (:import-from
@@ -61,7 +61,7 @@
    :ctrl-element
    :search-form))
 
-(in-package :dev.metalisp.sbt/component/form)
+(in-package :dev.metalisp.sbt/form)
 
 ;;; form
 

src/grid.lisp

@@ -35,7 +35,7 @@
 ;; richness. From mobile to desktop, the grid system will scale up
 ;; appropriately to ensure your designs are fully responsive.
 
-(defpackage dev.metalisp.sbt/layout/grid
+(defpackage dev.metalisp.sbt/grid
   (:use :cl)
   (:import-from
    :dev.metalisp.sbt/utility
@@ -45,7 +45,7 @@
    :row
    :col))
 
-(in-package :dev.metalisp.sbt/layout/grid)
+(in-package :dev.metalisp.sbt/grid)
 
 (defun string-clean (str)
   (string-trim " " (string-downcase str)))

src/list-group.lisp

@@ -17,14 +17,14 @@
 ;; of emails with the number of unread messages, a list of tasks with their
 ;; completion status, and so on.
 
-(defpackage dev.metalisp.sbt/component/list-group
+(defpackage dev.metalisp.sbt/list-group
   (:use :cl)
   (:export
    :item
    :list-group)
 (:documentation "A Common Lisp package for generating Bootstrap List Group components."))
 
-(in-package :dev.metalisp.sbt/component/list-group)
+(in-package :dev.metalisp.sbt/list-group)
 
 (defmacro item (&body body)
   "This macro generates a Bootstrap list group item.

src/nav-tab.lisp

@@ -33,13 +33,13 @@
 ;; adjusts its layout based on the size of the user's screen. This makes it a
 ;; flexible choice for a variety of web layouts.
 
-(defpackage dev.metalisp.sbt/component/nav
+(defpackage dev.metalisp.sbt/nav
   (:use :cl)
   (:export
    :item
    :nav))
 
-(in-package :dev.metalisp.sbt/component/nav)
+(in-package :dev.metalisp.sbt/nav)
 
 (defmacro item (name active url)
   "This macro generates a navigation item for a Bootstrap navigation list.

src/navbar.lisp

@@ -25,7 +25,7 @@
 ;; Form Support: You can include form elements directly in your Navbar, allowing
 ;; users to input data directly from the navigation bar.
 
-(defpackage dev.metalisp.sbt/component/navbar
+(defpackage dev.metalisp.sbt/navbar
   (:use :cl)
   (:import-from
    :dev.metalisp.sbt/component/btn
@@ -45,7 +45,7 @@
    :form-search
    :collapsible))
 
-(in-package :dev.metalisp.sbt/component/navbar)
+(in-package :dev.metalisp.sbt/navbar)
 
 (defmacro brand-logo ((&key (src "#") (alt "Logo") (width 30) (height 24) (classes "d-inline-block align-text-top")))
   "This macro generates a brand logo for a Bootstrap navbar.

src/pagination.lisp

@@ -15,13 +15,13 @@
 ;; You can also include "Previous" and "Next" buttons to help users navigate
 ;; through the pages.
 
-(defpackage dev.metalisp.sbt/component/pagination
+(defpackage dev.metalisp.sbt/pagination
   (:use :cl)
   (:export
    :item
    :pagination))
 
-(in-package :dev.metalisp.sbt/component/pagination)
+(in-package :dev.metalisp.sbt/pagination)
 
 (defmacro item ((&key (url "#") (active nil)) &body body)
   "This macro generates a Bootstrap pagination item.

src/questionnaire.lisp

@@ -8,7 +8,7 @@
 ;;;; etc.), and the form itself can be customized according to the target URL
 ;;;; for submissions.
 
-(defpackage dev.metalisp.sbt/pattern/questionnaire
+(defpackage dev.metalisp.sbt/questionnaire
   (:documentation "Defines the `dev.metalisp.sbt/questionnaire` package, a utility suite for generating HTML forms with various types of questions.")
   (:use
    :cl)
@@ -32,7 +32,7 @@
   (:export
    :questionnaire))
 
-(in-package :dev.metalisp.sbt/pattern/questionnaire)
+(in-package :dev.metalisp.sbt/questionnaire)
 
 (defun choicep (lst)
   "Checks if the given list LST is a valid choice.

src/spinner.lisp

@@ -15,7 +15,7 @@
 ;; 'danger', 'warning', 'info', 'light', 'dark'. You can also control the size
 ;; of the spinner through size classes.
 
-(defpackage dev.metalisp.sbt/component/spinner
+(defpackage dev.metalisp.sbt/spinner
   (:use :cl)
   (:export
    :spinner
@@ -53,7 +53,7 @@
    :spinner-grow-dark-sm)
   (:documentation "This package provides a set of macros to generate Bootstrap Spinner components."))
 
-(in-package :dev.metalisp.sbt/component/spinner)
+(in-package :dev.metalisp.sbt/spinner)
 
 (defmacro spinner ((&key (type "border") (color "primary") (size nil)))
   "This macro generates a Bootstrap spinner with a specified type, color, and size.

src/table.lisp

@@ -1,9 +1,9 @@
-(defpackage dev.metalisp.sbt/component/tbl
+(defpackage dev.metalisp.sbt/tbl
   (:use :cl)
   (:export
    :table))
 
-(in-package :dev.metalisp.sbt/component/tbl)
+(in-package :dev.metalisp.sbt/tbl)
 
 (defmacro table (&body body)
   `(spinneret:with-html