gnu: gpick: Improve style.

* gnu/packages/image.scm (gpick): Improve style.
  [source]: Run guix style.
  [native-inputs, inputs]: Improve style, reorder fields.
  [arguments]: Improve style, rewrite using gexps.

Change-Id: I200251fd3b7b6cebc24e3fa75a6525cc4dc6de1d
Signed-off-by: Sharlatan Hellseher <sharlatanus@gmail.com>
This commit is contained in:
Nicolas Graves 2025-06-14 22:46:36 +02:00 committed by Sharlatan Hellseher
parent 296f097044
commit e22efb74ed
No known key found for this signature in database
GPG key ID: 76D727BFF62CD2B5

View file

@ -2053,36 +2053,31 @@ custom formats for representing color values..")
(package (package
(name "gpick") (name "gpick")
(version "0.2.6") (version "0.2.6")
(source (origin (source
(method git-fetch) (origin
(uri (git-reference (method git-fetch)
(url "https://github.com/thezbyg/gpick") (uri (git-reference
(commit (string-append name "-" version)))) (url "https://github.com/thezbyg/gpick")
(file-name (git-file-name name version)) (commit (string-append name "-" version))))
(sha256 (file-name (git-file-name name version))
(base32 (sha256
"0nl89gca5nmbyycv5rl5bm6k7facapdk4pab9pl949aa3cjw9bk7")))) (base32 "0nl89gca5nmbyycv5rl5bm6k7facapdk4pab9pl949aa3cjw9bk7"))))
(build-system scons-build-system) (build-system scons-build-system)
(native-inputs
`(("boost" ,boost)
("gettext" ,gettext-minimal)
("pkg-config" ,pkg-config)
("ragel" ,ragel)))
(inputs
`(("expat" ,expat)
("gtk2" ,gtk+-2)
("lua" ,lua-5.2)))
(arguments (arguments
`(#:tests? #f (list
#:scons ,scons-python2 #:tests? #f
#:scons-flags (list (string-append "DESTDIR=" %output)) #:scons scons-python2
#:phases #:scons-flags
(modify-phases %standard-phases #~(list (string-append "DESTDIR=" %output))
(add-before 'build 'fix-lua-reference #:phases
(lambda _ #~(modify-phases %standard-phases
(substitute* "SConscript" (add-before 'build 'fix-lua-reference
(("lua5.2") "lua-5.2")) (lambda _
#t))))) (substitute* "SConscript"
(("lua5.2")
"lua-5.2")))))))
(native-inputs (list boost gettext-minimal pkg-config ragel))
(inputs (list expat gtk+-2 lua-5.2))
(home-page "http://www.gpick.org/") (home-page "http://www.gpick.org/")
(synopsis "Color picker") (synopsis "Color picker")
(description "Gpick is an advanced color picker and palette editing tool.") (description "Gpick is an advanced color picker and palette editing tool.")