aboutsummaryrefslogtreecommitdiff
path: root/guix/store.scm
diff options
context:
space:
mode:
authorMathieu Othacehe <othacehe@gnu.org>2020-11-04 14:39:40 +0100
committerMathieu Othacehe <othacehe@gnu.org>2020-11-22 17:17:56 +0100
commit2a7e1121d83ee173a7a0dbfb978a4ac363c7c4a6 (patch)
tree2f08fa8525602737ce47d6c13c5d5d0e4ea234b6 /guix/store.scm
parent6f78fe353e5cb5109eb1eed8727870a9e5efdb59 (diff)
downloadguix-2a7e1121d83ee173a7a0dbfb978a4ac363c7c4a6.tar
guix-2a7e1121d83ee173a7a0dbfb978a4ac363c7c4a6.tar.gz
guix: store: Add ensure-path.
* guix/store.scm (ensure-path): New procedure.
Diffstat (limited to 'guix/store.scm')
-rw-r--r--guix/store.scm6
1 files changed, 6 insertions, 0 deletions
diff --git a/guix/store.scm b/guix/store.scm
index d859ea33ed..11e2dae579 100644
--- a/guix/store.scm
+++ b/guix/store.scm
@@ -113,6 +113,7 @@
build
query-failed-paths
clear-failed-paths
+ ensure-path
add-temp-root
add-indirect-root
add-permanent-root
@@ -1397,6 +1398,11 @@ When a handler is installed with 'with-build-handler', it is called any time
(message "unsupported build mode")
(status 1))))))))))))
+(define-operation (ensure-path (store-path path))
+ "Make PATH a temporary root for the duration of the current session.
+Return #t."
+ boolean)
+
(define-operation (add-temp-root (store-path path))
"Make PATH a temporary root for the duration of the current session.
Return #t."