                                              {:types :raw}))))
         (is (false? (execute-xquery session "fn:doc-available(\"derp\")" {:shape :single!}))) 
         (is (= "xs:boolean"
-               (result->type (execute-xquery session "xdmp:exists(collection())"
+               (result->type (execute-xquery session "fn:true()"
                                              {:types :raw}))))
-        (is (true? (execute-xquery session "xdmp:exists(collection())" {:shape :single!})))))
+        (is (true? (execute-xquery session "fn:true()" {:shape :single!})))))
 
     (testing "......XSDate"
       (with-open [session (create-session db)]


;; (comment
;;   (session->map (create-session {:uri "xdbc://localhost:8383/"
;;                                     :user "rest-admin" :password "x"
;;                                     :content-base "TutorialDB"}
;;                                    {} (uri-content-source "xdbc://localhost:8383/"
;;                                                           (security-options TODO)))))

(deftest content-source-creation-with-host-port-user-pwd
  (testing "content source creation from host and port"
    (let [cs (make-hosted-content-source "localhost" 8383
                                         {:user "test-admin" :password "uruktesting"})]
      (and (instance? ContentSource cs)
           (= 8383 (.getPort (.getConnectionProvider cs)))
           (= "localhost" (.getHostName (.getConnectionProvider cs)))))))
