inferior: 'cached-channel-instance' does not cache unauthenticated instances.
The comment saying that caching is fine even when AUTHENTICATE? is false was true in commitmaster838ac881ec
, but it became incorrect in7cfd789150
, which no longer calls 'latest-channel-instances' on cache hits. * guix/inferior.scm (cached-channel-instance): Do not create CACHED when AUTHENTICATE? is false.
parent
1a0696e0a6
commit
9f371f23eb
|
@ -785,6 +785,9 @@ determines whether CHANNELS are authenticated."
|
|||
(define add-indirect-root*
|
||||
(store-lift add-indirect-root))
|
||||
|
||||
(define add-temp-root*
|
||||
(store-lift add-temp-root))
|
||||
|
||||
(mkdir-p cache-directory)
|
||||
(maybe-remove-expired-cache-entries cache-directory
|
||||
cache-entries
|
||||
|
@ -805,11 +808,15 @@ determines whether CHANNELS are authenticated."
|
|||
;; what's going to be built.
|
||||
(built-derivations (list profile))
|
||||
|
||||
;; Note: Caching is fine even when AUTHENTICATE? is false because
|
||||
;; we always call 'latest-channel-instances?'.
|
||||
;; Cache if and only if AUTHENTICATE? is true.
|
||||
(if authenticate?
|
||||
(mbegin %store-monad
|
||||
(symlink* (derivation->output-path profile) cached)
|
||||
(add-indirect-root* cached)
|
||||
(return cached))))))
|
||||
(return cached))
|
||||
(mbegin %store-monad
|
||||
(add-temp-root* profile)
|
||||
(return profile))))))))
|
||||
|
||||
(define* (inferior-for-channels channels
|
||||
#:key
|
||||
|
|
Reference in New Issue