From 57e04b430882b68decd80bb87c75fe482cdbf711 Mon Sep 17 00:00:00 2001
From: "Kevin M. Rosenberg" <kevin@rosenberg.net>
Date: Thu, 4 Jan 2007 19:58:28 +0000
Subject: [PATCH] r11451: add test

---
 tests.lisp | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/tests.lisp b/tests.lisp
index 7ee4ad4..3cfb19f 100644
--- a/tests.lisp
+++ b/tests.lisp
@@ -159,3 +159,6 @@
 
 (deftest :s3 (slot-value (class-of home) 'ho::user-name-plural)
   "Addresses")
+
+(deftest :s4 (slot-value (class-of mary) 'ho::description)
+  "A Person")
-- 
2.34.1