summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
6aea635)
* sql/oodml.lisp: Use explicit database in fault-join-target-slot
[Patch from Walter Pelissero]
+08 Feb 2005 Kevin Rosenberg <kevin@rosenberg.net>
+ * sql/oodml.lisp: Use explicit database in fault-join-target-slot
+ [Patch from Walter Pelissero]
+
29 Jan 2005 Kevin Rosenberg <kevin@rosenberg.net>
* db-postgresql/postgresql-loader.lisp: Add additional
directories to Fink on darwin [patch from Cyrus Harmon].
29 Jan 2005 Kevin Rosenberg <kevin@rosenberg.net>
* db-postgresql/postgresql-loader.lisp: Add additional
directories to Fink on darwin [patch from Cyrus Harmon].
(list instance jcc)))
(select (sql-expression :attribute (gethash :foreign-key tdbi) :table jc-view-table)
:from (sql-expression :table jc-view-table)
(list instance jcc)))
(select (sql-expression :attribute (gethash :foreign-key tdbi) :table jc-view-table)
:from (sql-expression :table jc-view-table)
+ :where jq
+ :database (view-database object))))))))
(every #'(lambda (dea) (typep (slot-value dea 'address) 'address)) dea-list)
(mapcar #'(lambda (dea) (slot-value (slot-value dea 'address) 'addressid)) dea-list))))
t t t t (1 1 2 2 2))
(every #'(lambda (dea) (typep (slot-value dea 'address) 'address)) dea-list)
(mapcar #'(lambda (dea) (slot-value (slot-value dea 'address) 'addressid)) dea-list))))
t t t t (1 1 2 2 2))
(deftest :oodml/uoj/2
(progn
(clsql:update-objects-joins (list company1))
(deftest :oodml/uoj/2
(progn
(clsql:update-objects-joins (list company1))