From 20ee2f57bc912b921f1c74bcd69b3a981b1da303 Mon Sep 17 00:00:00 2001
From: Andrew Wong <wongandj@icloud.com>
Date: Sat, 31 May 2025 20:38:30 -0400
Subject: [PATCH] gnu: Add bemoji.

* gnu/packages/xdisorg.scm (bemoji): New variable.

Change-Id: If1df8f6d50647c2c4efd7ab294891cc2698385c0
Signed-off-by: Steve George <steve@futurile.net>
---
 gnu/packages/xdisorg.scm | 39 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 39 insertions(+)

diff --git a/gnu/packages/xdisorg.scm b/gnu/packages/xdisorg.scm
index 90bdbcba61244c2581e4d543eff275e2d346c50f..1e9784103823eddb291227346ddde3a14891d27b 100644
--- a/gnu/packages/xdisorg.scm
+++ b/gnu/packages/xdisorg.scm
@@ -113,6 +113,7 @@
   #:use-module (gnu packages compression)
   #:use-module (gnu packages cpp)
   #:use-module (gnu packages crypto)
+  #:use-module (gnu packages curl)
   #:use-module (gnu packages datastructures)
   #:use-module (gnu packages docbook)
   #:use-module (gnu packages documentation)
@@ -828,6 +829,44 @@ options are given, the action applies to the focused window.")
 following the mouse.")
     (license license:x11)))
 
+(define-public bemoji
+  (package
+    (name "bemoji")
+    (version "0.4.0")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/marty-oehme/bemoji")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "030zlq4k32zdkpmzc9dkiz2l94z10z1qkk70a9mxc8yi9fij2z0x"))))
+    (build-system copy-build-system)
+    (inputs (list bash-minimal coreutils-minimal curl grep sed))
+    (arguments
+     (list
+      #:install-plan #~'(("bemoji" "bin/bemoji"))
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'install 'wrap-program
+            (lambda _
+              (wrap-program (string-append #$output "/bin/bemoji")
+                `("PATH" prefix
+                  ,(search-path-as-list
+                    '("bin")
+                    '#$(map (lambda (input)
+                              (lookup-package-input this-package input))
+                            '("coreutils-minimal" "curl" "grep" "sed"))))))))))
+    (home-page "https://github.com/marty-oehme/bemoji")
+    (synopsis "Emoji picker for @code{dmenu}-like launchers")
+    (description
+     "Bemoji is an emoji picker for @code{dmenu}-like launchers
+(e.g. @code{bemenu}, @code{wofi}, @code{rofi}, @code{fuzzel}, etc.)  It will
+remember your favorite emojis and give you quick access to them via a separately
+installed clipboard tool (e.g. @command{wl-copy}, @code{xclip}, etc.), or a
+typing tool (@code{wtype}, @code{xdotool}, etc.), or via standard output.")
+    (license license:expat)))
 
 (define-public pixman
   (package