diff options
| author | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2021-05-11 22:42:59 -0400 |
|---|---|---|
| committer | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2021-05-11 22:42:59 -0400 |
| commit | b7cbca221f74e9e9ef43c228dca9fa9930babec5 (patch) | |
| tree | 33d0c1b2ae9a09a6e50652f61cdb16c7ba5d9003 /guix/scripts | |
| parent | c80627731bc100baa4b6c5d265df5465cee9498e (diff) | |
| parent | fb5d04d36334784a5ac76c4a90de1e1376120885 (diff) | |
Merge branch 'version-1.3.0'
Diffstat (limited to 'guix/scripts')
| -rw-r--r-- | guix/scripts/describe.scm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/guix/scripts/describe.scm b/guix/scripts/describe.scm index b5f6249176..a3e3338f7e 100644 --- a/guix/scripts/describe.scm +++ b/guix/scripts/describe.scm @@ -301,4 +301,11 @@ text. The hyperlink links to a web view of COMMIT, when available." (channels (display-profile-info #f format channels)))) (profile - (display-profile-info (canonicalize-profile profile) format)))))) + ;; For the current profile, resort to 'current-channels', which has a + ;; fallback to metadata from (guix config) in case PROFILE lacks it. + (let ((channels (if (and (current-profile) + (string=? profile (current-profile))) + (current-channels) + (profile-channels profile)))) + (display-profile-info (canonicalize-profile profile) + format channels))))))) |