guix_mirror_bot pushed a commit to branch master
in repository guix.
commit 64127f9fd1b1ffb6bf116724846c351e0dc1ad8b
Author: Vinicius Monego <[email protected]>
AuthorDate: Sat Jun 21 17:14:38 2025 -0300
gnu: ranger: Improve package style.
* gnu/packages/disk.scm (ranger): Move native-inputs under arguments,
inputs under native-inputs.
[arguments]: Use G-Expressions.
Change-Id: Icc09cef69a552643bba426debee5002de787a86f
---
gnu/packages/disk.scm | 54 +++++++++++++++++++++++++--------------------------
1 file changed, 27 insertions(+), 27 deletions(-)
diff --git a/gnu/packages/disk.scm b/gnu/packages/disk.scm
index 51e2fd7928..506f1ffb38 100644
--- a/gnu/packages/disk.scm
+++ b/gnu/packages/disk.scm
@@ -980,37 +980,37 @@ Duperemove can also take input from the @command{fdupes}
program.")
(package
(name "ranger")
(version "1.9.4")
- (source (origin
- (method url-fetch)
- (uri (string-append "https://ranger.github.io/"
- "ranger-" version ".tar.gz"))
- (sha256
- (base32
- "128ggxfhfmckl7x89flwxks7gxq0m02insdizcsp62193c6mxmvs"))))
+ (source
+ (origin
+ (method url-fetch)
+ (uri (string-append "https://ranger.github.io/" "ranger-" version
+ ".tar.gz"))
+ (sha256
+ (base32 "128ggxfhfmckl7x89flwxks7gxq0m02insdizcsp62193c6mxmvs"))))
(build-system pyproject-build-system)
- (inputs
- (list bash-minimal w3m))
- (native-inputs
- (list python-pytest python-setuptools python-wheel))
(arguments
- '(#:phases
- (modify-phases %standard-phases
- (add-after 'install 'wrap-program
- ;; Tell 'ranger' where 'w3mimgdisplay' is.
- (lambda* (#:key inputs outputs #:allow-other-keys)
- (let* ((out (assoc-ref outputs "out"))
- (ranger (string-append out "/bin/ranger"))
- (w3m (assoc-ref inputs "w3m"))
- (w3mimgdisplay (string-append w3m
- "/libexec/w3m/w3mimgdisplay")))
- (wrap-program ranger
- `("W3MIMGDISPLAY_PATH" ":" prefix (,w3mimgdisplay)))))))))
+ (list
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'install 'wrap-program
+ ;; Tell 'ranger' where 'w3mimgdisplay' is.
+ (lambda _
+ (let* ((ranger (string-append #$output "/bin/ranger"))
+ (w3m #$(this-package-input "w3m"))
+ (w3mimgdisplay (string-append w3m
+ "/libexec/w3m/w3mimgdisplay")))
+ (wrap-program ranger
+ `("W3MIMGDISPLAY_PATH" ":" prefix
+ (,w3mimgdisplay)))))))))
+ (native-inputs (list python-pytest python-setuptools python-wheel))
+ (inputs (list bash-minimal w3m))
(home-page "https://ranger.github.io/")
(synopsis "Console file manager")
- (description "ranger is a console file manager with Vi key bindings. It
-provides a minimalistic and nice curses interface with a view on the directory
-hierarchy. It ships with @code{rifle}, a file launcher that is good at
-automatically finding out which program to use for what file type.")
+ (description
+ "ranger is a console file manager with Vi key bindings. It provides a
+minimalistic and nice curses interface with a view on the directory hierarchy.
+It ships with @code{rifle}, a file launcher that is good at automatically
+finding out which program to use for what file type.")
(license license:gpl3)))
(define-public fff