This is an automated email from the git hooks/post-receive script.
guix_mirror_bot pushed a commit to branch master
in repository guix.
The following commit(s) were added to refs/heads/master by this push:
new f6bbfca83f gnu: Add gubar.
f6bbfca83f is described below
commit f6bbfca83ff3307d3e7210ce77a11958cde2a97f
Author: Alissa Istleyeva <[email protected]>
AuthorDate: Sun Feb 8 19:52:57 2026 +0500
gnu: Add gubar.
* gnu/packages/wm.scm (gubar): New variable.
Merges: https://codeberg.org/guix/guix/pulls/6245
Change-Id: I55f6071e61742beff890961577001d87ea9bb558
Reviewed-by: David Thompson <[email protected]>
Signed-off-by: Sharlatan Hellseher <[email protected]>
---
gnu/packages/wm.scm | 60 +++++++++++++++++++++++++++++++++++++++++++++++++++++
1 file changed, 60 insertions(+)
diff --git a/gnu/packages/wm.scm b/gnu/packages/wm.scm
index 35000fe26a..3018a2ee48 100644
--- a/gnu/packages/wm.scm
+++ b/gnu/packages/wm.scm
@@ -91,6 +91,7 @@
;;; Copyright © 2026 Spencer King <[email protected]>
;;; Copyright © 2026 Igorj Gorjaĉev <[email protected]>
;;; Copyright © 2026 Nikita Mitasov <[email protected]>
+;;; Copyright © 2026 Alissa Istleyeva <[email protected]>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -161,6 +162,8 @@
#:use-module (gnu packages gperf)
#:use-module (gnu packages gtk)
#:use-module (gnu packages gnome)
+ #:use-module (gnu packages guile)
+ #:use-module (gnu packages guile-xyz)
#:use-module (gnu packages haskell-check)
#:use-module (gnu packages haskell-web)
#:use-module (gnu packages haskell-xyz)
@@ -3267,6 +3270,63 @@ core/thread.")
#$flags))))
(synopsis "Waybar with experimental features"))))
+(define-public gubar
+ (package
+ (name "gubar")
+ (version "0.1.0")
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://codeberg.org/trevarj/gubar";)
+ (commit (string-append "v" version))))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32
+ "1fdg9dvfyhmqsivgj262jczijfcpk8hqwbcs5q5nrxbw59a9wl96"))))
+ (build-system gnu-build-system)
+ (arguments
+ (list
+ #:tests? #f ; no tests
+ #:modules `(((guix build guile-build-system)
+ #:select (target-guile-effective-version))
+ (srfi srfi-26)
+ ,@%default-gnu-imported-modules)
+ #:phases
+ (with-imported-modules `((guix build guile-build-system)
+ ,@%default-gnu-imported-modules)
+ #~(modify-phases %standard-phases
+ (delete 'strip)
+ (add-before 'configure 'setenv
+ (lambda _
+ (setenv "GUILE_AUTO_COMPILE" "0")))
+ (add-after 'install 'wrap
+ (lambda* (#:key inputs #:allow-other-keys)
+ (let* ((version (target-guile-effective-version))
+ (site-ccache (string-append "/lib/guile/" version
+ "/site-ccache"))
+ (site (string-append "/share/guile/site/" version))
+ (bin (string-append #$output "/bin/")))
+ (define (dep-path env path)
+ (list env '= (map (cut string-append <> path)
+ (list #$output
+ #$(this-package-input
+ "guile-fibers")
+ #$(this-package-input
+ "guile-json")))))
+ (wrap-program (string-append bin "gubar")
+ (dep-path "GUILE_LOAD_PATH" site)
+ (dep-path "GUILE_LOAD_COMPILED_PATH" site-ccache)))))))))
+ (native-inputs (list autoconf automake guile-3.0 pkg-config))
+ (inputs (list bash-minimal guile-fibers guile-json-4))
+ (home-page "https://codeberg.org/trevarj/gubar";)
+ (synopsis "Swaybar generator written in Guile Scheme")
+ (description "gubar is a text generator for swaybar written and configured
+with Guile Scheme. It provides an interface for defining status line blocks,
+runs block update commands concurrently, and displays the output of the update
+commands in the status line using swaybar-protocol.")
+ (license license:gpl3+)))
+
(define-public wlr-randr
(package
(name "wlr-randr")
