--- a
+++ b/inst/queries/datasetStatus.xq
@@ -0,0 +1,3 @@
+; datasetStatus
+(fn [dataset]
+	 (query {:select [:status :text] :from [:dataset] :where [:= :name dataset]}))