aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix-data-service/config.scm.in9
1 files changed, 8 insertions, 1 deletions
diff --git a/guix-data-service/config.scm.in b/guix-data-service/config.scm.in
index ab34254..6532641 100644
--- a/guix-data-service/config.scm.in
+++ b/guix-data-service/config.scm.in
@@ -17,7 +17,10 @@
;;; <http://www.gnu.org/licenses/>.
(define-module (guix-data-service config)
- #:export (%config))
+ #:use-module (guix store)
+ #:export (%config
+
+ assets-dir-in-store?))
(define %config
(let ((config
@@ -57,3 +60,7 @@
(database-name . "guix_data_service"))))
(lambda (key)
(assoc-ref config key))))
+
+(define assets-dir-in-store?
+ (string-prefix? (%store-prefix)
+ (%config 'assets-dir)))