07/07: guix package: Do not say "nothing to do" upon rollback & co.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 0294cfc25a6a8d8cbe4374b3df01ae7acd39263f
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Sun Jun 13 23:46:17 2021 +0200

    guix package: Do not say "nothing to do" upon rollback & co.
    
    Previously, "guix package --switch-generations=4" or similar would print
    "nothing to do".
    
    * guix/scripts/package.scm (process-actions): Do not warn about "nothing
    to do" when one of %ACTIONS is requested.
---
 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 6db8380..694959d 100644
--- a/guix/scripts/package.scm
+++ b/guix/scripts/package.scm
@@ -1044,7 +1044,10 @@ processed, #f otherwise."
 
       (warn-about-old-distro)
 
-      (when (and (null? files) (manifest-transaction-null? trans))
+      (when (and (null? files) (manifest-transaction-null? trans)
+                 (not (any (match-lambda
+                             ((key . _) (assoc-ref %actions key)))
+                           opts)))
         ;; We can reach this point because the user did not specify any action
         ;; (as in "guix package"), did not specify any package (as in "guix
         ;; install"), or because there's nothing to upgrade (as when running