bug#60206: [PATCH] gnu: add wl-color-picker

[Ludovic Courtès]

Hi,

Sughosha <Sughosha@proton.me> skribis:

> * gnu/packages/xdisorg.scm (wl-color-picker): New variable.

I addressed ‘guix lint’ warnings and made cosmetic changes, as shown
below.

Applied with these changes, thanks!

Ludo’.

diff --git a/gnu/packages/xdisorg.scm b/gnu/packages/xdisorg.scm
index 5eee724f2b..f6f015732d 100644
--- a/gnu/packages/xdisorg.scm
+++ b/gnu/packages/xdisorg.scm
@@ -2476,14 +2476,16 @@ (define-public wl-color-picker
   (package
     (name "wl-color-picker")
     (version "1.3")
-    (source
-     (origin
-       (method git-fetch)
-       (uri (git-reference
-              (url "https://github.com/jgmdev/wl-color-picker";)
-              (commit (string-append "v" version))))
-       (sha256
-        (base32 "0h5b8qfwri7a1invk8dran3436ac37x6r8fic3l5cxqj5rgnky4n"))))
+    (home-page "https://github.com/jgmdev/wl-color-picker";)
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url home-page)
+                    (commit (string-append "v" version))))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "0h5b8qfwri7a1invk8dran3436ac37x6r8fic3l5cxqj5rgnky4n"))))
     (build-system copy-build-system)
     (arguments
      `(#:install-plan '(("wl-color-picker.sh" "bin/wl-color-picker")
@@ -2491,22 +2493,21 @@ (define-public wl-color-picker
                         ("wl-color-picker.svg"
                          "share/icons/hicolor/scalable/apps/")
                         ("wl-color-picker.desktop" "share/applications/"))
-           #:phases (modify-phases %standard-phases
-                      (add-after 'install 'wrap-script
-                        (lambda* (#:key outputs #:allow-other-keys)
-                          (wrap-program (string-append
-                                          (assoc-ref outputs "out")
-                                          "/bin/wl-color-picker")
-                           `("PATH" = (,(getenv "PATH")))))))))
-    (inputs
-     (list coreutils-minimal
-           grim
-           hicolor-icon-theme
-           imagemagick
-           slurp
-           wl-clipboard
-           zenity))
-    (home-page "https://github.com/jgmdev/wl-color-picker";)
+       #:phases (modify-phases %standard-phases
+                  (add-after 'install 'wrap-script
+                    (lambda* (#:key outputs #:allow-other-keys)
+                      (wrap-program (string-append (assoc-ref outputs "out")
+                                                   "/bin/wl-color-picker")
+                                    `("PATH" =
+                                      (,(getenv "PATH")))))))))
+    (inputs (list coreutils-minimal
+                  bash-minimal
+                  grim
+                  hicolor-icon-theme
+                  imagemagick
+                  slurp
+                  wl-clipboard
+                  zenity))
     (synopsis "Wayland color picker")
     (description
      "@command{wl-color-picker} is a script that provides color picker for