                        (= (:OrganizationId org-permissions) organization-id))
                      permissions))))
         sync-event-permissions
-        (fn [_ _ _ _]
+        (fn []
           (when (and (= @permissions-user 0)
                      (> @permissions-event 0))
             (reset! permissions-event 0))

                     :ReadActivity       @org-event-permissions
                     :EditActivity       @org-event-permissions
                     :DeleteActivity     @org-event-permissions
                     :AddUser            @org-event-permissions
                     :ReadUser           @org-event-permissions
                     :EditUser           @org-event-permissions
                     :DeleteUser         @org-event-permissions
                     :SendEmail          @org-permissions
                     :GrantPermission    @org-permissions}]
                (let [current-event-permissions (get-current-event-permissions)

                     (remove-watch api/organizations-db :organization-edit)))))
    (add-watch permissions-user
               :preset-org-permissions
               (fn [_ _ _ _]
                 (sync-event-permissions)
                 (sync-org-permissions)))
    (add-watch permissions-event
               :preset-event-permissions
               (fn [_ _ _ _]
                 (sync-event-permissions)))
    (fn []
      (let [{:keys [Name PaymentRecipientId]} @form
            errors (validator @form)
