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
|
@ -455,8 +455,9 @@ the image."
|
|||
#$profile
|
||||
#:database #+database
|
||||
#:system (or #$target (utsname:machine (uname)))
|
||||
#:entry-point (string-append #$profile "/"
|
||||
#$entry-point)
|
||||
#:entry-point #$(and entry-point
|
||||
#~(string-append #$profile "/"
|
||||
#$entry-point))
|
||||
#:symlinks '#$symlinks
|
||||
#:compressor '#$(compressor-command compressor)
|
||||
#:creation-time (make-time time-utc 0 1))))))
|
||||
|
|
Loading…
Reference in New Issue