diff options
| author | Marius Bakke <marius@gnu.org> | 2022-08-30 20:18:55 +0200 |
|---|---|---|
| committer | Marius Bakke <marius@gnu.org> | 2022-08-30 20:18:55 +0200 |
| commit | 59c136ef611b7a00683af1d1bb406dbd1af1a2bd (patch) | |
| tree | 1ab434580130c7fd11b8ef5c22a91087b8401559 /gnu/services.scm | |
| parent | a6f42953626df657041fddfc36a207b06c38f944 (diff) | |
| parent | d62fc2cc837b095ff1a633ae2639513ea3253596 (diff) | |
| download | guix-59c136ef611b7a00683af1d1bb406dbd1af1a2bd.tar.gz | |
Merge branch 'staging' into core-updates
Diffstat (limited to 'gnu/services.scm')
| -rw-r--r-- | gnu/services.scm | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/gnu/services.scm b/gnu/services.scm index cc2540ee50..2abef557d4 100644 --- a/gnu/services.scm +++ b/gnu/services.scm @@ -482,11 +482,8 @@ configuration being used." (define (provenance-entry config-file) "Return system entries describing the operating system provenance: the channels in use and CONFIG-FILE, if it is true." - (define profile - (current-profile)) - (define channels - (and=> profile profile-channels)) + (current-channels)) (mbegin %store-monad (let ((config-file (cond ((string? config-file) |