56 lines
2.5 KiB
Scheme
56 lines
2.5 KiB
Scheme
|
(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
|