From b3e73367d8c0701e6f3b582a1492d5cbc23305a2 Mon Sep 17 00:00:00 2001 From: Marcus Kammer Date: Mon, 17 Jul 2023 13:26:58 +0200 Subject: [PATCH] Rename packages --- examples/album.lisp | 4 ++-- src/component/accordion.lisp | 4 ++-- src/component/alert.lisp | 4 ++-- src/component/badge.lisp | 4 ++-- src/component/button.lisp | 4 ++-- src/component/card.lisp | 22 +++------------------- src/component/dropdown.lisp | 4 ++-- src/component/nav-tab.lisp | 4 ++-- src/component/navbar.lisp | 4 ++-- src/component/pagination.lisp | 4 ++-- src/component/spinner.lisp | 4 ++-- src/component/table.lisp | 4 ++-- src/layout/grid.lisp | 4 ++-- 13 files changed, 27 insertions(+), 43 deletions(-) diff --git a/examples/album.lisp b/examples/album.lisp index 78d4e3c..3e56455 100644 --- a/examples/album.lisp +++ b/examples/album.lisp @@ -1,7 +1,7 @@ (defpackage cl-sbt-album (:use :cl) - (:import-from :cl-sbt-grid :container :row :col) - (:import-from :cl-sbt-navbar :navbar :brand :toggler) + (:import-from :cl-sbt/grid :container :row :col) + (:import-from :cl-sbt/navbar :navbar :brand :toggler) (:import-from :cl-sbt :write-string-to-file :with-page) (:import-from :spinneret :with-html-string) (:export diff --git a/src/component/accordion.lisp b/src/component/accordion.lisp index e999722..4c97e71 100644 --- a/src/component/accordion.lisp +++ b/src/component/accordion.lisp @@ -20,7 +20,7 @@ ;; information, but you want to keep the interface uncluttered by hiding content ;; that isn't immediately necessary. -(defpackage cl-sbt-accordion +(defpackage cl-sbt/accordion (:use :cl) (:export :header @@ -28,7 +28,7 @@ :item :accordion)) -(in-package :cl-sbt-accordion) +(in-package :cl-sbt/accordion) (defmacro header (target name show) "This macro generates a Bootstrap header for an accordion item. diff --git a/src/component/alert.lisp b/src/component/alert.lisp index c77be4f..c26fd4e 100644 --- a/src/component/alert.lisp +++ b/src/component/alert.lisp @@ -24,7 +24,7 @@ ;; ;; -(defpackage cl-sbt-alert +(defpackage cl-sbt/alert (:use :cl) (:export :btn @@ -46,7 +46,7 @@ :alert-dismiss-light :alert-dismiss-dark)) -(in-package :cl-sbt-alert) +(in-package :cl-sbt/alert) (defmacro btn () "This macro generates the close button used in a Bootstrap alert when it is set to be dismissible." diff --git a/src/component/badge.lisp b/src/component/badge.lisp index 1195fe6..6d2ace8 100644 --- a/src/component/badge.lisp +++ b/src/component/badge.lisp @@ -29,7 +29,7 @@ ;; contextual information to your web pages. It's fully responsive, easy to ;; use, and customizable to fit your needs. -(defpackage cl-sbt-badge +(defpackage cl-sbt/badge (:use :cl) (:export :badge @@ -52,7 +52,7 @@ :badge-pill-dark :badge-pill-link)) -(in-package :cl-sbt-badge) +(in-package :cl-sbt/badge) (defmacro badge ((&key (type "primary") (classes "")) &body body) "This macro generates a Bootstrap badge. diff --git a/src/component/button.lisp b/src/component/button.lisp index 3df3c34..a025dd8 100644 --- a/src/component/button.lisp +++ b/src/component/button.lisp @@ -27,7 +27,7 @@ ;; Outline buttons: Bootstrap also provides 'outline' button styles which have ;; transparent backgrounds and a colored border and text. -(defpackage cl-sbt-btn +(defpackage cl-sbt/btn (:use :cl) (:export :btn @@ -86,7 +86,7 @@ :btn-outline-dark-sm :btn-outline-link-sm)) -(in-package :cl-sbt-btn) +(in-package :cl-sbt/btn) (defmacro btn ((&key (type "primary") (size "")) &body body) "This macro generates a Bootstrap button. diff --git a/src/component/card.lisp b/src/component/card.lisp index bfc9322..e39d123 100644 --- a/src/component/card.lisp +++ b/src/component/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 cl-sbt-card +(defpackage cl-sbt/card (:use :cl) (:export :title @@ -42,25 +42,9 @@ :card-with-img :card :card-group) - (:documentation "A Common Lisp package for generating Bootstrap Card components. + (:documentation "A Common Lisp package for generating Bootstrap Card components.")) -Bootstrap's Card component is a flexible and extensible container for content, introduced in Bootstrap 4 as a replacement for panels, wells, and thumbnails. This package provides macros for generating card components, including card title, subtitle, text, link, header, image, and body. - -The `title`, `subtitle`, `text`, `link`, and `header` macros generate corresponding elements of a Bootstrap card. - -The `img` macro generates a card image element, with an optional source URL and alternative text. - -The `body` macro generates the main content area for the card. - -The `card-with-img` macro generates a card with an image and body content. - -The `card` macro generates a card with body content. - -The `card-group` macro generates a group of cards, each with a title, text, and optional image and link. - -Example usage can be found in the documentation for each macro.")) - -(in-package :cl-sbt-card) +(in-package :cl-sbt/card) (defmacro title (&body body) "This macro generates a Bootstrap card title. diff --git a/src/component/dropdown.lisp b/src/component/dropdown.lisp index e2e3b97..0a913ea 100644 --- a/src/component/dropdown.lisp +++ b/src/component/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 cl-sbt-dropdown +(defpackage cl-sbt/dropdown (:use :cl) (:export :menu :item :dropdown)) -(in-package :cl-sbt-dropdown) +(in-package :cl-sbt/dropdown) (defmacro menu (&body body) "This macro generates a Bootstrap dropdown menu. diff --git a/src/component/nav-tab.lisp b/src/component/nav-tab.lisp index 1c748f9..09c2d0a 100644 --- a/src/component/nav-tab.lisp +++ b/src/component/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 cl-sbt-nav +(defpackage cl-sbt/nav (:use :cl) (:export :item :nav)) -(in-package :cl-sbt-nav) +(in-package :cl-sbt/nav) (defmacro item (name active url) "This macro generates a navigation item for a Bootstrap navigation list. diff --git a/src/component/navbar.lisp b/src/component/navbar.lisp index 758c1e5..e462fe5 100644 --- a/src/component/navbar.lisp +++ b/src/component/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 cl-sbt-navbar +(defpackage cl-sbt/navbar (:use :cl) (:export :navbar @@ -35,7 +35,7 @@ :toggler :brand-logo)) -(in-package :cl-sbt-navbar) +(in-package :cl-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. diff --git a/src/component/pagination.lisp b/src/component/pagination.lisp index 020ebd2..8463df0 100644 --- a/src/component/pagination.lisp +++ b/src/component/pagination.lisp @@ -15,13 +15,13 @@ ;; You can also include "Previous" and "Next" buttons to help users navigate ;; through the pages. -(defpackage cl-sbt-pagination +(defpackage cl-sbt/pagination (:use :cl) (:export :item :pagination)) -(in-package :cl-sbt-pagination) +(in-package :cl-sbt/pagination) (defmacro item ((&key (url "#") (active nil)) &body body) "This macro generates a Bootstrap pagination item. diff --git a/src/component/spinner.lisp b/src/component/spinner.lisp index 3548df3..efcee0b 100644 --- a/src/component/spinner.lisp +++ b/src/component/spinner.lisp @@ -15,7 +15,7 @@ ;; 'danger', 'warning', 'info', 'light', 'dark'. You can also control the size ;; of the spinner through size classes. -(defpackage cl-sbt-spinner +(defpackage cl-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 :cl-sbt-spinner) +(in-package :cl-sbt/spinner) (defmacro spinner ((&key (type "border") (color "primary") (size nil))) "This macro generates a Bootstrap spinner with a specified type, color, and size. diff --git a/src/component/table.lisp b/src/component/table.lisp index d8b73e6..fe7c1b8 100644 --- a/src/component/table.lisp +++ b/src/component/table.lisp @@ -1,9 +1,9 @@ -(defpackage cl-sbt-tbl +(defpackage cl-sbt/tbl (:use :cl) (:export :table)) -(in-package :cl-sbt-tbl) +(in-package :cl-sbt/tbl) (defmacro table (&body body) `(spinneret:with-html diff --git a/src/layout/grid.lisp b/src/layout/grid.lisp index a3aee5e..e1322c8 100644 --- a/src/layout/grid.lisp +++ b/src/layout/grid.lisp @@ -35,14 +35,14 @@ ;; richness. From mobile to desktop, the grid system will scale up ;; appropriately to ensure your designs are fully responsive. -(defpackage cl-sbt-grid +(defpackage cl-sbt/grid (:use :cl) (:export :container :row :col)) -(in-package :cl-sbt-grid) +(in-package :cl-sbt/grid) (defun make-container-class (name value default-class) "Generates a Bootstrap container class string for a particular breakpoint.