04/06: guix package: Always upgrade packages that have propagated inputs.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit 81e3485c0d012e29d4e551107fc31c0da89b0006
Author: Ludovic Courtès <address@hidden>
Date:   Wed Jun 7 11:15:29 2017 +0200

    guix package: Always upgrade packages that have propagated inputs.
    
    * guix/scripts/package.scm (transaction-upgrade-entry): Always upgrade
    packages that have propagated inputs.
---
 guix/scripts/package.scm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/guix/scripts/package.scm b/guix/scripts/package.scm
index a6bfb03..5e19df5 100644
--- a/guix/scripts/package.scm
+++ b/guix/scripts/package.scm
@@ -312,7 +312,10 @@ of relevance scores."
              ((=)
               (let ((candidate-path (derivation->output-path
                                      (package-derivation (%store) pkg))))
-                (if (string=? path candidate-path)
+                ;; XXX: When there are propagated inputs, assume we need to
+                ;; upgrade the whole entry.
+                (if (and (string=? path candidate-path)
+                         (null? (package-propagated-inputs pkg)))
                     transaction
                     (manifest-transaction-install-entry
                      (package->manifest-entry pkg output)