From 201568831267441297c0906c3bd1c0a7a7378b06 Mon Sep 17 00:00:00 2001
From: Wolfgang Walther <wolfgangwalther@users.noreply.github.com>
Date: Tue, 29 Dec 2020 23:58:37 +0100
Subject: [PATCH] Fix spec test concurrency issue related to tx=commit on
 simple_pk

---
 test/Feature/InsertSpec.hs   | 2 +-
 test/fixtures/privileges.sql | 1 +
 test/fixtures/schema.sql     | 6 ++++++
 3 files changed, 8 insertions(+), 1 deletion(-)

diff --git a/test/Feature/InsertSpec.hs b/test/Feature/InsertSpec.hs
index 93312d5c4..9fb4d3420 100644
--- a/test/Feature/InsertSpec.hs
+++ b/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
diff --git a/test/fixtures/privileges.sql b/test/fixtures/privileges.sql
index a41da7990..4628d6f17 100644
--- a/test/fixtures/privileges.sql
+++ b/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
diff --git a/test/fixtures/schema.sql b/test/fixtures/schema.sql
index 1f218b6cd..bf9d15323 100644
--- a/test/fixtures/schema.sql
+++ b/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