guix package: '--upgrade' no longer reverses package order.
Reported by Oleg Pykhalov <go.wigust@gmail.com> at <https://lists.gnu.org/archive/html/help-guix/2017-10/msg00000.html>. * guix/scripts/package.scm (options->installable)[upgraded]: Use 'fold-right' instead of 'fold'.
This commit is contained in:
parent
3ae76f7f57
commit
eca16a3d1d
|
@ -604,12 +604,12 @@ and upgrades."
|
||||||
(options->upgrade-predicate opts))
|
(options->upgrade-predicate opts))
|
||||||
|
|
||||||
(define upgraded
|
(define upgraded
|
||||||
(fold (lambda (entry transaction)
|
(fold-right (lambda (entry transaction)
|
||||||
(if (upgrade? (manifest-entry-name entry))
|
(if (upgrade? (manifest-entry-name entry))
|
||||||
(transaction-upgrade-entry entry transaction)
|
(transaction-upgrade-entry entry transaction)
|
||||||
transaction))
|
transaction))
|
||||||
transaction
|
transaction
|
||||||
(manifest-entries manifest)))
|
(manifest-entries manifest)))
|
||||||
|
|
||||||
(define to-install
|
(define to-install
|
||||||
(filter-map (match-lambda
|
(filter-map (match-lambda
|
||||||
|
|
Loading…
Reference in New Issue