diff options
| author | Nicolas Graves <ngraves@ngraves.fr> | 2024-05-10 00:53:12 +0200 |
|---|---|---|
| committer | Sharlatan Hellseher <sharlatanus@gmail.com> | 2024-10-14 23:53:14 +0100 |
| commit | 28b20e9c93b630e8ce940228c3e241d156949afa (patch) | |
| tree | fbcc173155944e3ceb5865f9abd415b050ffbc81 | |
| parent | f87a274837dbc871eb2dabe0e49101201ef507bc (diff) | |
gnu: qtile: Improve package style.
* gnu/packages/wm.scm (qtile): Indent as needed. Light rewrite using
format instead of string-append in [arguments]<#:phases>. Ensure
lines wrap with intended length.
Change-Id: I297718138642d24604743137f3181bfc76a51b54
Signed-off-by: Nicolas Goaziou <mail@nicolasgoaziou.fr>
| -rw-r--r-- | gnu/packages/wm.scm | 72 |
1 files changed, 37 insertions, 35 deletions
diff --git a/gnu/packages/wm.scm b/gnu/packages/wm.scm index d055b0f2eb..6f3a5bcfcc 100644 --- a/gnu/packages/wm.scm +++ b/gnu/packages/wm.scm @@ -603,11 +603,11 @@ subscribe to events.") (name "qtile") (version "0.23.0") (source - (origin - (method url-fetch) - (uri (pypi-uri "qtile" version)) - (sha256 - (base32 "1v8rxm2xg2igxv6gwa78wrkxzgfxmxfgflbjdp4fm7cxjdx3zrpa")))) + (origin + (method url-fetch) + (uri (pypi-uri "qtile" version)) + (sha256 + (base32 "1v8rxm2xg2igxv6gwa78wrkxzgfxmxfgflbjdp4fm7cxjdx3zrpa")))) (build-system pyproject-build-system) (arguments (list @@ -617,26 +617,28 @@ subscribe to events.") #:phases #~(modify-phases %standard-phases (add-after 'unpack 'patch-paths - (lambda* (#:key inputs #:allow-other-keys) - (substitute* "libqtile/pangocffi.py" - (("^gobject = ffi.dlopen.*") - (string-append "gobject = ffi.dlopen(\"" - (assoc-ref inputs "glib") "/lib/libgobject-2.0.so.0\")\n")) - (("^pango = ffi.dlopen.*") - (string-append "pango = ffi.dlopen(\"" - (assoc-ref inputs "pango") "/lib/libpango-1.0.so.0\")\n")) - (("^pangocairo = ffi.dlopen.*") - (string-append "pangocairo = ffi.dlopen(\"" - (assoc-ref inputs "pango") "/lib/libpangocairo-1.0.so.0\")\n"))))) - (add-after 'install 'install-xsession - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out")) - (xsessions (string-append out "/share/xsessions")) - (qtile (string-append out "/bin/qtile start"))) - (mkdir-p xsessions) - (copy-file "resources/qtile.desktop" (string-append xsessions "/qtile.desktop")) - (substitute* (string-append xsessions "/qtile.desktop") - (("qtile start") qtile))))) + (lambda* (#:key inputs #:allow-other-keys) + (substitute* "libqtile/pangocffi.py" + (("^(gobject = ffi.dlopen).*" all def) + (format #f "~a(~s)~%" def + (search-input-file inputs "/lib/libgobject-2.0.so.0"))) + (("^(pango = ffi.dlopen).*" all def) + (format #f "~a(~s)~%" def + (search-input-file inputs "/lib/libpango-1.0.so.0"))) + (("^(pangocairo = ffi.dlopen).*" all def) + (format #f "~a(~s)~%" def + (search-input-file + inputs "/lib/libpangocairo-1.0.so.0")))))) + (add-after 'install 'install-xsessions + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (xsessions (string-append out "/share/xsessions")) + (qtile (string-append out "/bin/qtile start"))) + (mkdir-p xsessions) + (copy-file "resources/qtile.desktop" + (string-append xsessions "/qtile.desktop")) + (substitute* (string-append xsessions "/qtile.desktop") + (("qtile start") qtile))))) (add-before 'check 'pre-check (lambda* (#:key tests? #:allow-other-keys) (when tests? @@ -645,17 +647,17 @@ subscribe to events.") (setenv "DISPLAY" ":1") (setenv "XDG_CACHE_HOME" "/tmp"))))))) (inputs - (list glib pango pulseaudio)) + (list glib pango pulseaudio)) (propagated-inputs - (list python-cairocffi - python-cffi - python-dateutil - python-dbus-next - python-iwlib - python-keyring - python-mpd2 - python-pyxdg - python-xcffib)) + (list python-cairocffi + python-cffi + python-dateutil + python-dbus-next + python-iwlib + python-keyring + python-mpd2 + python-pyxdg + python-xcffib)) (native-inputs (list pkg-config python-flake8 |