          mustafied (mustafy feature)
          merger (path->merge-fn target keyworded-path)
          merged (merger mustafied)
+         merged (assoc merged :_version (:version feature))
          merged (update merged :_tiles #(clojure.set/union % (tiles/nl (:geometry feature))) )]
      merged)))
 

               [:dataset "varchar(100)"]
               [:collection "varchar(255)"]
               [:feature_id "varchar(100)"]
               [:valid_from "timestamp without time zone"]
               [:valid_to "timestamp without time zone"]
               [:feature "text"]

  (assoc acc :_valid_to (:validity feature)))

(defn- new-current-sql []
  (str "INSERT INTO " (qualified-current) " (dataset, collection, feature_id, version, valid_from, valid_to, feature, tiles)
VALUES (?, ?, ? ,?, ?, ?, ?, ?)"))

(defn- new-current
  ([db features]
   (try
     (let [transform-fn (juxt :_dataset :_collection :_id :_version :_valid_from :_valid_to pg/to-json :_tiles)
           records (map transform-fn features)]
       (j/execute! db (cons (new-current-sql) records) :multi? true :transaction? false))
      (catch java.sql.SQLException e (j/print-sql-exception-chain e))))
