Make sure with-test-user macro causes *is-superuser?* to be bound correctly

test/metabase/test/data/users.clj

@@ -166,7 +166,10 @@
 (defn do-with-test-user
   "Call `f` with various `metabase.api.common` dynamic vars bound to the test User named by `user-kwd`."
   [user-kwd f]
-  ((middleware/bind-current-user (fn [_] (f))) {:metabase-user-id (user->id user-kwd)}))
+  ((middleware/bind-current-user (fn [_] (f)))
+   (let [user-id (user->id user-kwd)]
+     {:metabase-user-id user-id
+      :is-superuser?    (db/select-one-field :is_superuser User :id user-id)})))
 
 (defmacro with-test-user
   "Call `body` with various `metabase.api.common` dynamic vars like `*current-user*` bound to the test User named by