(in-package :cl-sbt)

(defmacro table (&body body)
  `(spinneret:with-html
     (:table :class "table"
	     ,@body)))

(defmacro table-striped (&body body)
  `(spinneret:with-html
     (:table :class "table table-striped"
	     ,@body)))

(defmacro table-bordered (&body body)
  `(spinneret:with-html
     (:table :class "table table-bordered"
	     ,@body)))

(defmacro table-hover (&body body)
  `(spinneret:with-html
     (:table :class "table table-hover"
	     ,@body)))

(defmacro table-condensed (&body body)
  `(spinneret:with-html
     (:table :class "table table-condensed"
	     ,@body)))