X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=usql-tests%2Ftest-fdml.lisp;h=ae986faa832929b443595b9700af2f74bbc7a6d8;hb=17ed099bd39998e297b20daefd3f80264b0677f5;hp=e24bbc644140f31340f865adef04c09ce457decd;hpb=ce0e343835a040406678dff74a62d1b0cb56f317;p=clsql.git

diff --git a/usql-tests/test-fdml.lisp b/usql-tests/test-fdml.lisp
index e24bbc6..ae986fa 100644
--- a/usql-tests/test-fdml.lisp
+++ b/usql-tests/test-fdml.lisp
@@ -23,7 +23,7 @@
     (progn
       (usql:insert-records :into [employee] 
                            :values `(11 1 "Yuri" "Gagarin" "gagarin@soviet.org"
-                                     1 1 1.85 t ,(usql:get-time)))
+                                     1 1 1.85 t ,(clsql-base:get-time)))
       (values 
        (usql:select [first-name] [last-name] [email]
                     :from [employee] :where [= [emplid] 11])
@@ -392,4 +392,4 @@
             (apply #'values (nreverse results)))))))
   nil nil ("lenin@soviet.org"))
 
-#.(usql:restore-sql-reader-syntax-state)
\ No newline at end of file
+#.(usql:restore-sql-reader-syntax-state)