diff options
author | Ludovic Courtès <ludovic.courtes@inria.fr> | 2023-03-23 17:22:38 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2023-04-06 18:34:15 +0200 |
commit | 57db09aae73e3713a10c5253758d84e1046f80dc (patch) | |
tree | e55165d2dc5149e4200a7a854b428bb4d6ec8a46 /guix/scripts/shell.scm | |
parent | 58769f92732434cadda565093f5951a1957ccd13 (diff) |
environment: Add '--nesting'.
* guix/scripts/environment.scm (show-environment-options-help)
(%options): Add '--nesting'.
(options/resolve-packages): Handle it.
(launch-environment/container): Add #:nesting? and honor it.
[nesting-mappings]: New procedure.
(guix-environment*): Add support for '--nesting'.
* guix/scripts/shell.scm (profile-cached-gc-root): Special-case
'nesting?'.
* tests/guix-environment-container.sh: Test it.
* doc/guix.texi (Invoking guix shell): Document it.
Diffstat (limited to 'guix/scripts/shell.scm')
-rw-r--r-- | guix/scripts/shell.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/guix/scripts/shell.scm b/guix/scripts/shell.scm index 92bbfb04d0..1b42cc2af0 100644 --- a/guix/scripts/shell.scm +++ b/guix/scripts/shell.scm @@ -389,6 +389,8 @@ return #f and #f." (if (not file) (loop rest system file (cons spec specs)) (values #f #f))) + ((('nesting? . #t) . rest) + (loop rest system file (append specs '("nested guix")))) ((('load . ('package candidate)) . rest) (if (and (not file) (null? specs)) (loop rest system candidate specs) |