From 540da548663dfee0e96fcfa5e53974c7114c2c77 Mon Sep 17 00:00:00 2001 From: Marcus Kammer Date: Sun, 9 Feb 2025 09:47:15 +0100 Subject: [PATCH] Reformat code to fit in 85 col --- src/section.lisp | 13 +++++++++---- 1 file changed, 9 insertions(+), 4 deletions(-) diff --git a/src/section.lisp b/src/section.lisp index 81aeb53..ce093e4 100644 --- a/src/section.lisp +++ b/src/section.lisp @@ -67,12 +67,17 @@ ROW-CLASS: Similar to GRID-CLASS. Can be: BODY: The content of the section." `(spinneret:with-html (:section :class - ,(cond ((stringp grid-class) `(combine-classes "mb-3" ,grid-class)) - ((eq 'make-grid-class (first grid-class)) `(combine-classes "mb-3" ,grid-class)) - (t `(combine-classes "mb-3" (apply #'make-grid-class ',grid-class)))) + ,(cond ((stringp grid-class) + `(combine-classes "mb-3" ,grid-class)) + ((eq 'make-grid-class (first grid-class)) + `(combine-classes "mb-3" ,grid-class)) + (t + `(combine-classes "mb-3" + (apply #'make-grid-class ',grid-class)))) ,@(if row-class `((:div :class ,(cond ((stringp row-class) row-class) - ((eq 'make-grid-class (first row-class)) row-class) + ((eq 'make-grid-class (first row-class)) + row-class) (t `(apply #'make-grid-class ',row-class))) ,@body)) body))))