Add section macro
This commit is contained in:
parent
889c05b0d3
commit
336856152c
1 changed files with 14 additions and 0 deletions
14
src/section.lisp
Normal file
14
src/section.lisp
Normal file
|
@ -0,0 +1,14 @@
|
||||||
|
;;;; -*- mode: common-lisp; coding: utf-8; -*-
|
||||||
|
|
||||||
|
(defpackage ml-sbt/section
|
||||||
|
(:use :cl)
|
||||||
|
(:export :with-section))
|
||||||
|
|
||||||
|
(in-package :ml-sbt/section)
|
||||||
|
|
||||||
|
(defmacro with-section (headline &body body)
|
||||||
|
`(spinneret:with-html
|
||||||
|
(:section :class "mb-3"
|
||||||
|
(:div :class "d-flex justify-content-between flex-wrap flex-md-nowrap align-items-center pt-3 pb-2 mb-3 border-bottom"
|
||||||
|
(:h* ,headline))
|
||||||
|
,@body)))
|
Loading…
Add table
Reference in a new issue