mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-13 14:40:21 -05:00
pack: Fix 'guix pack -f docker'.
Regression introduced in a0f352b30f
.
* guix/scripts/pack.scm (docker-image): Check whether ENTRY-POINT is
true before returning (string-append #$profile ...).
This commit is contained in:
parent
2f9f792a1e
commit
c5f66d2931
1 changed files with 3 additions and 2 deletions
|
@ -455,8 +455,9 @@ (define build
|
||||||
#$profile
|
#$profile
|
||||||
#:database #+database
|
#:database #+database
|
||||||
#:system (or #$target (utsname:machine (uname)))
|
#:system (or #$target (utsname:machine (uname)))
|
||||||
#:entry-point (string-append #$profile "/"
|
#:entry-point #$(and entry-point
|
||||||
#$entry-point)
|
#~(string-append #$profile "/"
|
||||||
|
#$entry-point))
|
||||||
#:symlinks '#$symlinks
|
#:symlinks '#$symlinks
|
||||||
#:compressor '#$(compressor-command compressor)
|
#:compressor '#$(compressor-command compressor)
|
||||||
#:creation-time (make-time time-utc 0 1))))))
|
#:creation-time (make-time time-utc 0 1))))))
|
||||||
|
|
Loading…
Reference in a new issue