cbaines pushed a commit to branch trunk
in repository data-service.
commit 1ac9f8072e22c09ec4c5cbfd3ad98adc3d9468a0
Author: Christopher Baines <[email protected]>
AuthorDate: Tue Mar 11 12:42:20 2025 +0000
Avoid URL conflicts in tests
---
tests/jobs-load-new-guix-revision.scm | 2 +-
tests/model-git-branch.scm | 2 +-
tests/model-git-commit.scm | 2 +-
tests/model-git-repository.scm | 2 +-
4 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/tests/jobs-load-new-guix-revision.scm
b/tests/jobs-load-new-guix-revision.scm
index bcd9579..64f2464 100644
--- a/tests/jobs-load-new-guix-revision.scm
+++ b/tests/jobs-load-new-guix-revision.scm
@@ -97,7 +97,7 @@
(match (enqueue-load-new-guix-revision-job
conn
- (git-repository-url->git-repository-id conn "test-url")
+ (git-repository-url->git-repository-id conn "test-url3")
"test-commit"
"test-source")
((id)
diff --git a/tests/model-git-branch.scm b/tests/model-git-branch.scm
index 1bcc1c3..5c2dfe8 100644
--- a/tests/model-git-branch.scm
+++ b/tests/model-git-branch.scm
@@ -16,7 +16,7 @@
(with-postgresql-transaction
conn
(lambda (conn)
- (let* ((url "test-url")
+ (let* ((url "test-url4")
(git-repository-id
(git-repository-url->git-repository-id conn url)))
(insert-git-branch-entry conn git-repository-id "master")
diff --git a/tests/model-git-commit.scm b/tests/model-git-commit.scm
index a983401..ef4f535 100644
--- a/tests/model-git-commit.scm
+++ b/tests/model-git-commit.scm
@@ -17,7 +17,7 @@
(with-postgresql-transaction
conn
(lambda (conn)
- (let* ((url "test-url")
+ (let* ((url "test-url5")
(git-repository-id
(git-repository-url->git-repository-id conn url))
(git-branch-id
diff --git a/tests/model-git-repository.scm b/tests/model-git-repository.scm
index ca43c59..8f40778 100644
--- a/tests/model-git-repository.scm
+++ b/tests/model-git-repository.scm
@@ -22,7 +22,7 @@
#t)))
#:always-rollback? #t))
- (let* ((url "test-url")
+ (let* ((url "test-url6")
(id (git-repository-url->git-repository-id conn url)))
(with-postgresql-transaction
conn
