diff options
| -rw-r--r-- | tests/model-package.scm | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/tests/model-package.scm b/tests/model-package.scm index 814a6e1..bf2cf71 100644 --- a/tests/model-package.scm +++ b/tests/model-package.scm @@ -99,13 +99,13 @@ (package-replacement-package-ids (make-list (length mock-inferior-packages) (cons "integer" NULL)))) - (test-equal - (inferior-packages->package-ids - conn - (zip (map mock-inferior-package-name mock-inferior-packages) - (map mock-inferior-package-version mock-inferior-packages) - package-metadata-ids - package-replacement-package-ids)) + (test-equal "inferior-packages->package-ids is idempotent" + (inferior-packages->package-ids + conn + (zip (map mock-inferior-package-name mock-inferior-packages) + (map mock-inferior-package-version mock-inferior-packages) + package-metadata-ids + package-replacement-package-ids)) (inferior-packages->package-ids conn (zip (map mock-inferior-package-name mock-inferior-packages) |