summary refs log tree commit diff
path: root/tests/profiles.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2016-09-06 20:19:21 +0200
committerLudovic Courtès <ludo@gnu.org>2016-09-06 23:22:10 +0200
commitc8c25704aeb2e5fa4feb6a86235f9565738eea99 (patch)
tree2fd64514533485cd8b1bebf1bad851863d5756dd /tests/profiles.scm
parentdd72173455b31aeddb4a691285bd5c0702c75d34 (diff)
downloadguix-c8c25704aeb2e5fa4feb6a86235f9565738eea99.tar.gz
profiles: Add manifest-transaction helper procedures.
* guix/profiles.scm (manifest-transaction-install-entry)
(manifest-transaction-remove-pattern)
(manifest-transaction-null?): New procedures.
* tests/profiles.scm ("manifest-transaction-null?"): New test.
Diffstat (limited to 'tests/profiles.scm')
-rw-r--r--tests/profiles.scm3
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/profiles.scm b/tests/profiles.scm
index 028d7b6fb4..f9c2f5499e 100644
--- a/tests/profiles.scm
+++ b/tests/profiles.scm
@@ -187,6 +187,9 @@
       (and (null? remove) (null? install) (null? downgrade)
            (equal? (list (cons guile-2.0.9 guile-2.0.9)) upgrade)))))
 
+(test-assert "manifest-transaction-null?"
+  (manifest-transaction-null? (manifest-transaction)))
+
 (test-assertm "profile-derivation"
   (mlet* %store-monad
       ((entry ->   (package->manifest-entry %bootstrap-guile))