X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=tests%2Ftest-ooddl.lisp;h=48d1630fd6a815acb8636d491f2e390170c2cafd;hp=497bef6099c10b9d5c4a33686cdc681e4c559555;hb=8972490fe6f9453c5b70dae4fb1141cf9a67f0db;hpb=f246c3c7b48792a869cb1bae0637a2f00a0920bd

diff --git a/tests/test-ooddl.lisp b/tests/test-ooddl.lisp
index 497bef6..48d1630 100644
--- a/tests/test-ooddl.lisp
+++ b/tests/test-ooddl.lisp
@@ -48,9 +48,8 @@
   t t t)
 
 (deftest :ooddl/join/1
-    (mapcar #'(lambda (e)
-                (slot-value e 'companyid))
-            (company-employees company1))
+    (mapcar #'(lambda (e) (slot-value e 'ecompanyid))
+     (company-employees company1))
   (1 1 1 1 1 1 1 1 1 1))
 
 (deftest :ooddl/join/2