X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;ds=sidebyside;f=tests%2Ftest-oodml.lisp;h=a5fefe02e1ef057de740f7cb49488c251c019f97;hb=refs%2Ftags%2Fdebian-4.0.0-1;hp=0e91f2d42dc8baceb8846613c54487fabbcdd723;hpb=e567409d9fff3f7231c2a0bb69b345e19de2b246;p=clsql.git diff --git a/tests/test-oodml.lisp b/tests/test-oodml.lisp index 0e91f2d..a5fefe0 100644 --- a/tests/test-oodml.lisp +++ b/tests/test-oodml.lisp @@ -442,7 +442,7 @@ (deftest :oodml/uoj/1 (progn - (let* ((dea-list (select 'deferred-employee-address :caching nil :order-by [ea_join aaddressid] + (let* ((dea-list (select 'deferred-employee-address :caching nil :order-by ["ea_join" aaddressid] :flatp t)) (dea-list-copy (copy-seq dea-list)) (initially-unbound (every #'(lambda (dea) (not (slot-boundp dea 'address))) dea-list)))