Subject: [PATCH] scripts: refresh: Add -T option.

From: jgart <[email-masked]>
Date: Wed, 4 Jan 2023 19:10:32 -0600

* doc/guix.texi (Invoking guix refresh): Document the -T option.
* guix/scripts/refresh.scm (%options): Add the -T flag.
---
 doc/guix.texi            | 1 +
 guix/scripts/refresh.scm | 4 ++--
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/doc/guix.texi b/doc/guix.texi
index 96b4675a01..e3ecf1f148 100644
--- a/doc/guix.texi
+++ b/doc/guix.texi
@@ -14197,6 +14197,7 @@ for compatibility with an upgraded @code{flex} package.
 @table @code
 
 @item --list-transitive
+@item --T
 List all the packages which one or more packages depend upon.
 
 @example
diff --git a/guix/scripts/refresh.scm b/guix/scripts/refresh.scm
index 6498d73c2b..6b633840e0 100644
--- a/guix/scripts/refresh.scm
+++ b/guix/scripts/refresh.scm
@@ -101,7 +101,7 @@ (define %options
         (option '(#\r "recursive") #f #f
                 (lambda (opt name arg result)
                   (alist-cons 'recursive? #t result)))
-        (option '("list-transitive") #f #f
+        (option '(#\T "list-transitive") #f #f
                 (lambda (opt name arg result)
                   (alist-cons 'list-transitive? #t result)))
 
@@ -159,7 +159,7 @@ (define (show-help)
   (display (G_ "
   -r, --recursive        check the PACKAGE and its inputs for upgrades"))
   (display (G_ "
-      --list-transitive  list all the packages that PACKAGE depends on"))
+  -T, --list-transitive  list all the packages that PACKAGE depends on"))
   (newline)
   (display (G_ "
       --keyring=FILE     use FILE as the keyring of upstream OpenPGP keys"))
-- 
2.38.1