(address . guix-patches@gnu.org)(name . jgart)(address . jgart@dismail.de)
20211106085615.5497-1-jgart@dismail.de
* gnu/packages/suckless.scm (lukesmithxyz-st): New variable.
---
gnu/packages/suckless.scm | 37 +++++++++++++++++++++++++++++++++++++
1 file changed, 37 insertions(+)
Toggle diff (57 lines)
diff --git a/gnu/packages/suckless.scm b/gnu/packages/suckless.scm
index 0755700835..f055163478 100644
--- a/gnu/packages/suckless.scm
+++ b/gnu/packages/suckless.scm
@@ -35,6 +35,7 @@ (define-module (gnu packages suckless)
#:use-module (gnu packages fontutils)
#:use-module (gnu packages gawk)
#:use-module (gnu packages gnome)
+ #:use-module (gnu packages gtk)
#:use-module (gnu packages image)
#:use-module (gnu packages libbsd)
#:use-module (gnu packages linux)
@@ -441,6 +442,42 @@ (define-public xst
@end itemize")
(license license:expat)))
+(define-public lukesmithxyz-st
+ (let ((revision "0")
+ (commit "e053bd6036331cc7d14f155614aebc20f5371d3a"))
+ (package
+ (inherit st)
+ (name "lukesmithxyz-st")
+ (version "0.8.4")
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/LukeSmithxyz/st")
+ (commit commit)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "12avzzapkkj4mvd00zh8b6gynk6jysh84jcwlkliyyd82lvyw22v"))))
+ (arguments
+ (substitute-keyword-arguments (package-arguments st)
+ ((#:phases phases)
+ `(modify-phases ,phases
+ (add-after 'unpack 'remove-calls-to-git
+ (lambda _
+ (substitute* "Makefile"
+ (("git submodule init") "")
+ (("git submodule update") ""))))))))
+ (inputs
+ `(("libxext" ,libxext)
+ ("harfbuzz" ,harfbuzz)
+ ,@(package-inputs st)))
+ (home-page "https://github.com/LukeSmithxyz/st")
+ (synopsis "Luke Smith's fork of st")
+ (description
+"Luke's fork of the suckless simple terminal @command{st} with @command{vim}
+bindings and Xresource compatibility.")
+ (license license:expat))))
+
(define-public surf
(package
(name "surf")
--
2.33.1