projects
/
clsql.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r9259: fix typo in var name
[clsql.git]
/
sql
/
objects.lisp
diff --git
a/sql/objects.lisp
b/sql/objects.lisp
index 18444be9068161dbb497c4692696a82806a3f43a..6b2fb4b0b892391a84bd15227ff298c98cd94b2e 100644
(file)
--- a/
sql/objects.lisp
+++ b/
sql/objects.lisp
@@
-783,7
+783,7
@@
superclass of the newly-defined View Class."
:where jq)))))))
(defun update-object-joins (objects &key (slots t) (force-p t)
:where jq)))))))
(defun update-object-joins (objects &key (slots t) (force-p t)
- class-name (max-len *default-update-objects-max-len))
+ class-name (max-len *default-update-objects-max-len
*
))
"Updates the remote join slots, that is those slots defined without :retrieval :immediate."
(when objects
(unless class-name
"Updates the remote join slots, that is those slots defined without :retrieval :immediate."
(when objects
(unless class-name