From f146db80065fcbedd36053ddecc7b675bdf423da Mon Sep 17 00:00:00 2001
From: hashirama <noroi_harau@tutanota.com>
Date: Fri, 16 Feb 2024 16:35:43 -0400
Subject: [PATCH] update goldendict-ng

---
 ajatt/packages/dictionaries.scm | 11 ++++++----
 ajatt/packages/suckless.scm     |  2 ++
 ajatt/packages/suckless.scm~    | 36 +++++++++++++++++++++++++++++++++
 3 files changed, 45 insertions(+), 4 deletions(-)
 create mode 100644 ajatt/packages/suckless.scm~

diff --git a/ajatt/packages/dictionaries.scm b/ajatt/packages/dictionaries.scm
index 8197e23..a27c45c 100644
--- a/ajatt/packages/dictionaries.scm
+++ b/ajatt/packages/dictionaries.scm
@@ -31,23 +31,24 @@
 (define-public goldendict-ng
  (package
    (name "goldendict-ng")
-   (version "24.01.27")
+   (version "24.02.16")
    (source
     (origin
       (method git-fetch)
       (uri
        (git-reference
          (url "https://github.com/xiaoyifang/goldendict-ng.git")
-         (commit "92ad684d52526dc3f84a32dac5d14e60973aa663")))
+         (commit "68c95001005fd77c95936589bbc2487ff3086019")))
       (sha256
        (base32 "0r8hl5p4r369024dhf58md0k1776sbxg6yxqzhws6x257wc91bkh"))))
-   (build-system cmake-build-system)
+   (build-system cmake-build-system) 
    (arguments
      (list #:cmake cmake
            #:tests? #f
            #:configure-flags
            #~(list "-DCMAKE_BUILD_TYPE=Release"
-                   "-DMULTITHREADED_BUILD=8") ;; To avoid freezing the build
+                  ;; "--parallel=7"   ;; max to 7 threads in order to avoid freezing the build
+		 ) 
            #:phases
            #~(modify-phases %standard-phases
                (add-after 'unpack 'absolutize-qt-headers
@@ -122,3 +123,5 @@ to type in words without any accents or correct case.")
    (license
      (list license:gpl3+
            license:zlib))))
+
+goldendict-ng
diff --git a/ajatt/packages/suckless.scm b/ajatt/packages/suckless.scm
index a2f223b..7b31109 100644
--- a/ajatt/packages/suckless.scm
+++ b/ajatt/packages/suckless.scm
@@ -34,3 +34,5 @@ Useful for scripts where you can query the X selection without pressing mouse
 Button2 in cumbersome ways.")
     (home-page "https://tools.suckless.org/x/sselp/")
     (license license:expat)))
+
+sselp
diff --git a/ajatt/packages/suckless.scm~ b/ajatt/packages/suckless.scm~
new file mode 100644
index 0000000..a2f223b
--- /dev/null
+++ b/ajatt/packages/suckless.scm~
@@ -0,0 +1,36 @@
+(define-module (ajatt packages suckless)
+  #:use-module (gnu packages xorg)
+  #:use-module (guix gexp)
+  #:use-module (guix download)
+  #:use-module (guix build-system gnu)
+  #:use-module (guix packages)
+  #:use-module (guix utils)
+  #:use-module ((guix licenses) #:prefix license:))
+
+(define-public sselp
+  (package
+    (name "sselp")
+    (version "0.2")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "https://dl.suckless.org/tools"
+                                  "/sselp" version ".tar.gz"))
+              (sha256
+               (base32
+                "0k8fvf9g27yyaqpyhk6apbkq6r4vjwxhff1qb9ignxx2yvxy7qdf"))))
+    (build-system gnu-build-system)
+    (arguments
+      (list #:tests? #f
+            #:make-flags
+            #~(list (string-append "CC=" #$(cc-for-target))
+                    (string-append "PREFIX=" %output))
+            #:phases #~(modify-phases %standard-phases
+                         (delete 'configure))))
+    (inputs
+      (list libxrandr))
+    (synopsis "Simple X selection printer to stdout.")
+    (description "Simple X selection printer. Prints the X selection to stdout.
+Useful for scripts where you can query the X selection without pressing mouse
+Button2 in cumbersome ways.")
+    (home-page "https://tools.suckless.org/x/sselp/")
+    (license license:expat)))