1 files changed, 55 insertions(+), 0 deletions(-)

M guixrus/packages/utilities.scm

@@ 15,11 15,13 @@
   #:use-module (gnu packages debian)
   #:use-module (gnu packages disk)
   #:use-module (gnu packages flex)
+  #:use-module (gnu packages fontutils)
   #:use-module (gnu packages freedesktop)
   #:use-module (gnu packages gl)
   #:use-module (gnu packages gnome)
   #:use-module (gnu packages hardware)
   #:use-module (gnu packages linux)
+  #:use-module (gnu packages ncurses)
   #:use-module (gnu packages package-management)
   #:use-module (gnu packages pciutils)
   #:use-module (gnu packages perl)


@@ 625,3 627,56 @@ support.")
             (base32 "17avl5bgwlh5ayaqfg01sg9klf828hc0fd36cgzldnl595jyp1yb")))))
         (sha256
          (base32 "19j66fhckihbg30ypngvqc9bcva47mp379ch5vinasjdxgn3qbfl"))))))
+
+(define-public xst-guixrus
+  (package
+      (name "xst-guixrus")
+      (version "0.8.4.1")
+      (source
+       (origin
+         (file-name (string-append name "-" version ".tar.gz"))
+         (method url-fetch)
+         (uri
+           (string-append "https://github.com/gnotclub/xst/archive/refs/tags/v"
+                          version ".tar.gz"))
+         (sha256
+          (base32
+          "0v92hxy8p7nmiz1spyyydqkgsiyfnic6z72md08mshc9qak2vsyb"))))
+      (build-system gnu-build-system)
+      (arguments
+       '(#:tests? #f ; no tests
+         #:make-flags (list "CC=gcc"
+                            (string-append "PREFIX=" %output))
+         #:phases
+         (modify-phases %standard-phases
+           (delete 'configure)
+           (add-after 'unpack 'inhibit-terminfo-install
+                      (lambda _
+                        (substitute* "Makefile"
+                          (("\t@tic -s st.info") ""))
+                        #t)))))
+      (inputs
+       `(("libx11" ,libx11)
+         ("libxext" ,libxext)
+         ("libxft" ,libxft)
+         ("ncurses" ,ncurses)
+         ("fontconfig" ,fontconfig)
+         ("freetype" ,freetype)))
+      (native-inputs
+        `(("pkg-config" ,pkg-config)))
+      (home-page "https://github.com/gnotclub/xst")
+      (synopsis "Fork of st with some patches applied and other goodies")
+      (description
+"@command{xst} applies the following patches to @command{st}:
+@itemize
+@item @uref{https://st.suckless.org/patches/alpha/, alpha}
+@item @uref{https://st.suckless.org/patches/boxdraw/, boxdraw}
+@item @uref{https://st.suckless.org/patches/clipboard/, clipboard}
+@item @uref{https://st.suckless.org/patches/disable_bold_italic_fonts/, disable_bold_italic_fonts}
+@item @uref{https://st.suckless.org/patches/externalpipe/, externalpipe}
+@item @uref{https://st.suckless.org/patches/scrollback/, scrollback}
+@item @uref{https://st.suckless.org/patches/spoiler/, spoiler}
+@item @uref{https://st.suckless.org/patches/vertcenter/, vertcenter}
+@end itemize")
+      (license license:expat)))
+