Rename packages

This commit is contained in:
Marcus Kammer 2023-07-17 13:26:58 +02:00
parent 803168a11d
commit b3e73367d8
13 changed files with 27 additions and 43 deletions

View file

@ -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

View file

@ -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.

View file

@ -24,7 +24,7 @@
;; <button type="button" class="btn-close" data-bs-dismiss="alert" aria-label="Close"></button>
;; </div>
(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."

View file

@ -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.

View file

@ -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.

View file

@ -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.

View file

@ -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.

View file

@ -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.

View file

@ -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.

View file

@ -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.

View file

@ -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.

View file

@ -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

View file

@ -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.