Fix spec test concurrency issue related to tx=commit on simple_pk

test/Feature/InsertSpec.hs

@@ -421,7 +421,7 @@ spec actualPgVersion = do
     context "with unicode values" $
       it "succeeds and returns usable location header" $ do
         let payload = [json| { "k":"圍棋", "extra":"￥" } |]
-        p <- request methodPost "/simple_pk?select=extra,k"
+        p <- request methodPost "/simple_pk2?select=extra,k"
             [("Prefer", "tx=commit"), ("Prefer", "return=representation")]
             payload
         liftIO $ do

test/fixtures/privileges.sql

@@ -38,6 +38,7 @@ GRANT ALL ON TABLE
     , projects_view
     , projects_view_alt
     , simple_pk
+    , simple_pk2
     , tasks
     , filtered_tasks
     , tsearch

test/fixtures/schema.sql

@@ -666,6 +666,12 @@ CREATE TABLE simple_pk (
     extra character varying NOT NULL
 );
 
+CREATE TABLE simple_pk2 (
+    PRIMARY KEY (k),
+    k character varying NOT NULL,
+    extra character varying NOT NULL
+);
+
 CREATE TABLE users (
     id integer primary key,
     name text NOT NULL