   ; subscribe to a tag they can't?
   (when (user-in-tag-group? user-id tag-id)
     (d/transact conn [[:db/add [:user/id user-id]
-                         :user/subscribed-tag [:tag/id tag-id]]])))
+                       :user/subscribed-tag [:tag/id tag-id]]])))
 
 (defn user-unsubscribe-from-tag!
   [user-id tag-id]
   (d/transact conn [[:db/retract [:user/id user-id]
-                       :user/subscribed-tag [:tag/id tag-id]]]))
+                     :user/subscribed-tag [:tag/id tag-id]]]))
 
 (defn user-add-to-group! [user-id group-id]
   (d/transact conn [[:db/add [:group/id group-id]
-                       :group/user [:user/id user-id]]]))
+                     :group/user [:user/id user-id]]]))
 
 (defn user-make-group-admin! [user-id group-id]
   (d/transact conn [[:db/add [:group/id group-id]
-                       :group/user [:user/id user-id]]
-                      [:db/add [:group/id group-id]
-                       :group/admins [:user/id user-id]]]))
+                     :group/user [:user/id user-id]]
+                    [:db/add [:group/id group-id]
+                     :group/admins [:user/id user-id]]]))
 
 (defn user-is-group-admin?
   [user-id group-id]

(defn save-extension-token!
  [extension-id {:keys [access-token refresh-token]}]
  @(d/transact conn [[:db/add [:extension/id extension-id]
                        :extension/token access-token]
                       [:db/add [:extension/id extension-id]
                        :extension/refresh-token refresh-token]]))

(defn update-extension-config!
  [extension-id config]
  @(d/transact conn [[:db/add [:extension/id extension-id]
                       :extension/config (pr-str config)]]))

(defn set-extension-config!
  [extension-id k v]

                      (assoc k v)
                      pr-str)]
    (d/transact conn [[:db.fn/cas [:group/id group-id]
                       :group/settings old-prefs new-prefs]])))

(defn public-group-with-name
  [group-name]
