guix-dotfiles/modules/ryan-packages/binaries.scm

56 lines
2.5 KiB
Scheme
Raw Permalink Normal View History

2024-05-21 23:14:36 +00:00
(define-module (ryan-packages binaries)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix gexp)
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (guix build-system copy)
#:use-module (gnu packages base)
#:use-module (gnu packages bootstrap)
#:use-module (gnu packages compression)
#:use-module (gnu packages elf)
#:use-module (gnu packages gcc)
#:use-module (gnu packages glib))
(define-public superfile-bin
(package
(name "superfile-bin")
(version "1.1.2")
(source (origin
(method url-fetch)
(uri (string-append
"https://github.com/yorukot/superfile" "/releases/download/v"
version "/superfile-linux-v" version "-amd64.tar.gz"))
(sha256
(base32
"1hnhkd6ihp0wcrn54ipyki500xmz1kapaj8sykg7ykh1vv8y6hmm"))))
(build-system copy-build-system)
(arguments
(list #:install-plan #~'((#$(string-append
"superfile-linux-v" (package-version this-package) "-amd64/spf")
"bin/spf"))
#:phases
#~(modify-phases %standard-phases
(delete 'strip)
(add-after 'install 'patch-elf
(lambda _
(let ((spf (string-append #$output "/bin/spf")))
(invoke "patchelf" "--set-interpreter"
(string-append #$(this-package-input "glibc")
#$(glibc-dynamic-linker))
spf)
(invoke "patchelf" "--set-rpath"
(string-append (ungexp (this-package-input "gcc")
"lib")
"/lib")
spf)))))))
(supported-systems '("x86_64-linux"))
(native-inputs (list patchelf))
(inputs (list `(,gcc "lib") glibc))
(home-page "https://github.com/yorukot/superfile")
(synopsis "Pretty fancy and modern terminal file manager")
(description
"Terminal file-manager written in Go that is modern and extensible.")
(license license:expat)))
superfile-bin