[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/02: gnu: bombadillo: Improve package style.
From: |
guix-commits |
Subject: |
02/02: gnu: bombadillo: Improve package style. |
Date: |
Wed, 9 Mar 2022 09:35:22 -0500 (EST) |
ngz pushed a commit to branch master
in repository guix.
commit 723ec40936617554097ab30ac3abbc3507ba9dad
Author: Nicolas Goaziou <mail@nicolasgoaziou.fr>
AuthorDate: Wed Mar 9 15:34:23 2022 +0100
gnu: bombadillo: Improve package style.
* gnu/packages/web-browsers.scm (bombadillo)[arguments]: Use G-expressions.
Remove trailing #T from phases.
---
gnu/packages/web-browsers.scm | 36 ++++++++++++++++++------------------
1 file changed, 18 insertions(+), 18 deletions(-)
diff --git a/gnu/packages/web-browsers.scm b/gnu/packages/web-browsers.scm
index b13fd7a637..3d91b17ed3 100644
--- a/gnu/packages/web-browsers.scm
+++ b/gnu/packages/web-browsers.scm
@@ -785,24 +785,24 @@ history, and page outlines.")
(file-name (git-file-name name version))))
(build-system go-build-system)
(arguments
- `(#:import-path "tildegit.org/sloum/bombadillo"
- #:install-source? #f
- #:phases (modify-phases %standard-phases
- (add-after 'install 'install-data
- (lambda* (#:key outputs #:allow-other-keys)
- (let* ((builddir "src/tildegit.org/sloum/bombadillo")
- (out (assoc-ref outputs "out"))
- (pkg (strip-store-file-name out))
- (sharedir (string-append out "/share"))
- (appdir (string-append sharedir "/applications"))
- (docdir (string-append sharedir "/doc/" pkg))
- (mandir (string-append sharedir "/man/man1"))
- (pixdir (string-append sharedir "/pixmaps")))
- (with-directory-excursion builddir
- (install-file "bombadillo.desktop" appdir)
- (install-file "bombadillo.1" mandir)
- (install-file "bombadillo-icon.png" pixdir)
- #t)))))))
+ (list
+ #:import-path "tildegit.org/sloum/bombadillo"
+ #:install-source? #f
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'install 'install-data
+ (lambda _
+ (let* ((builddir "src/tildegit.org/sloum/bombadillo")
+ (pkg (strip-store-file-name #$output))
+ (sharedir (string-append #$output "/share"))
+ (appdir (string-append sharedir "/applications"))
+ (docdir (string-append sharedir "/doc/" pkg))
+ (mandir (string-append sharedir "/man/man1"))
+ (pixdir (string-append sharedir "/pixmaps")))
+ (with-directory-excursion builddir
+ (install-file "bombadillo.desktop" appdir)
+ (install-file "bombadillo.1" mandir)
+ (install-file "bombadillo-icon.png" pixdir))))))))
(home-page "https://bombadillo.colorfield.space")
(synopsis "Terminal browser for the gopher, gemini, and finger protocols")
(description "Bombadillo is a non-web browser for the terminal with