X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Foodml.lisp;h=ceb8f98851a1cfccc71bffda8db91ca71774c5cb;hb=5fa1db284bac0dcb501df1b8960c3b6f39ec9d27;hp=109fb4c920b15952cd549e41575d72cce84341c7;hpb=534849c88501e0ea2ee5dbf78d13d8cb73814d71;p=clsql.git

diff --git a/sql/oodml.lisp b/sql/oodml.lisp
index 109fb4c..ceb8f98 100644
--- a/sql/oodml.lisp
+++ b/sql/oodml.lisp
@@ -308,7 +308,7 @@
    the public api"
   (update-record-from-slots obj slot :database database))
 
-(defun view-classes-and-storable-slots (class)
+(defmethod view-classes-and-storable-slots (class)
   "Get a list of all the tables we need to update and the slots on them
 
    for non normalized classes we return the class and all its storable slots