define base-mixin

nixeagle · Jan 22, 2010 · 6fc4993 · 6fc4993
1 parent a0db842
commit 6fc4993
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/ldap.lisp b/ldap.lisp
@@ -96,6 +96,11 @@
   (:documentation "Return the path to the object.
 
 `base' in ldap speak is the same meaning as pwd in a shell."))
+
+(defclass base-mixin ()
+  ()
+  (:documentation "LDAP objects where the concept of `base' makes sense."))
+
 (defclass abstract-base ()
   ((base :type (or string abstract-base)
          :reader base