   "activate a feature for a percentage of users.
   percentages are out of 100"
   [{storage :storage} feature-name percent]
-  (with-storage
+  (update-in-storage
     (fn [feature]
       (assoc feature
              :percentage

  "deactivate a feature for a particular group.
  A group is just a string"
  [{storage :storage} feature-name group]
  (with-storage
    (fn [feature]
      (update-in feature
                 :groups

(defn activate
  "completely activate a feature for all users"
  [{storage :storage} feature-name]
  (update-in-storage
    #(assoc %
            :percentage
            100)))
