X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=sql%2Fgenerics.lisp;h=decc005de33aaba69ae897ebf9046de5a1625f1d;hp=f022ff92947c6614368b9c61fad0e5295b54b7a3;hb=d723e681ead5613b5ad8ad463c0bbd0c8f6aba1f;hpb=8b3d6ea42a982d60b4db9116e6aa9b94372cccbd

diff --git a/sql/generics.lisp b/sql/generics.lisp
index f022ff9..decc005 100644
--- a/sql/generics.lisp
+++ b/sql/generics.lisp
@@ -72,7 +72,7 @@ represented by SLOTS are initialised from the values of the
 supplied slots with other attributes having default
 values. Furthermore, OBJECT becomes associated with DATABASE."))
 
-(defgeneric update-records-from-instance (object &key database this-class)
+(defgeneric update-records-from-instance (object &key database)
   (:documentation
    "Using an instance of a View Class, OBJECT, update the table
 that stores its instance data. DATABASE defaults to