diff options
Diffstat (limited to 'lisp/sql/testimonials.lisp')
| -rw-r--r-- | lisp/sql/testimonials.lisp | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/lisp/sql/testimonials.lisp b/lisp/sql/testimonials.lisp new file mode 100644 index 0000000..37ac3d3 --- /dev/null +++ b/lisp/sql/testimonials.lisp @@ -0,0 +1,15 @@ +;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10 -*- +(declaim (optimize (speed 0) (safety 3) (debug 3))) + +(in-package :woodriverlessons) + +(defclass testimonials (postgres-record) + ((id :initarg :id + :initform nil + :accessor id) + (content :initarg :content + :initform nil + :accessor content) + (*table :initform "general.testimonials") + (*where-expression :initform "id = ~a")) + (:documentation "Holds the data for a general.testimonials type.")) |