   (add-rule [this rule]
     "Accepts a rule tuple")
   (remove-rule [this rule]
-    "Accepts a rule tuple"))
+    "Accepts a rule tuple")
+  (commit [this]
+    "Commits this transaction."))
 
 (defn identifier?
   "Accepts a String representing an identifier and returns true or false depending on if it is valid."

  (all-rules [this]
    "Accepts nothing but returns a channel of all Rules in the Collection.")
  (match-rules [this pattern]
    "Is passed a pattern and returns a channel with all matching rules."))

(defprotocol WriteTx
  (new-identifier [this]

  "Manages a collection of Statements and Rules, supports ontologies, and querying."
  (collection-name [this])
  (readTx [this]
    "Returns a ReadTx.")
  (write [this f]
    "Returns a ReadTx/WriteTx."))
;  (sparql-query [this query]
;    "")
;  (wander-query [this query]
