From: Russ Tyndall <russ@acceleration.net>
Date: Wed, 9 Jan 2013 17:22:00 +0000 (-0500)
Subject: changed view-classes-and-storable-slots to a defmethod
X-Git-Tag: v6.4.1~5
X-Git-Url: http://git.kpe.io/?p=clsql.git;a=commitdiff_plain;h=c7cbd01b259a1846a5e172d69c956b836b14febb

changed view-classes-and-storable-slots to a defmethod
---

diff --git a/ChangeLog b/ChangeLog
index c024a9b..0440489 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2013-01-09 Russ Tyndall <russ@acceleration.net>
+	sql/oodml.lisp - changed view-classes-and-storable-slots to a
+	method (as it was intended to be all along)
+
 2012-12-19 Kevin Rosenberg <kevin@rosenberg.net>
 	* Version 6.4
 
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