r10110: Automated commit for Debian build of clsql upstream-version-3.0.11
authorKevin M. Rosenberg <kevin@rosenberg.net>
Sat, 23 Oct 2004 15:35:10 +0000 (15:35 +0000)
committerKevin M. Rosenberg <kevin@rosenberg.net>
Sat, 23 Oct 2004 15:35:10 +0000 (15:35 +0000)
ChangeLog
debian/changelog
sql/oodml.lisp

index daaaa5cb0fc500594e0c4c3cd03d7d07958a37a6..7af023f92785e99b5e4256eedef7c6e2ad330752 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+23 Oct 2004 Kevin Rosenberg <kevin@rosenberg.net>
+       * sql/oodml.lisp: Commit patch from Walter Pelis
+       to use an object's database for a select on its slot.
+       
 20 Oct 2004 Kevin Rosenberg <kevin@rosenberg.net>
        * uffi/uffi.c, uffi/clsql-uffi.lisp: Commit patch from
        Aurelio Bignoli to fix negative 64-bit integers
index b2796b963e25ec4532a33ff48adaeedd69e255f2..30b11d569265e27900e0b82d43c63fccda0b352e 100644 (file)
@@ -1,3 +1,9 @@
+cl-sql (3.0.11-1) unstable; urgency=low
+
+  * New usptream
+
+ -- Kevin M. Rosenberg <kmr@debian.org>  Sat, 23 Oct 2004 09:34:31 -0600
+
 cl-sql (3.0.10-1) unstable; urgency=low
 
   * New upstream
index f3c4437b26504775746501ad9a76ac060320f028..9d8154f44b6a0c6ea72c8c013d825884351f92dd 100644 (file)
@@ -751,7 +751,8 @@ maximum of MAX-LEN instances updated in each query."
         (jc (gethash :join-class dbi)))
     (let ((jq (join-qualifier class object slot-def)))
       (when jq 
-        (select jc :where jq :flatp t :result-types nil)))))
+        (select jc :where jq :flatp t :result-types nil
+               :database (view-database object))))))
 
 (defun fault-join-slot (class object slot-def)
   (let* ((dbi (view-class-slot-db-info slot-def))