me/guix
Archived
1
0
Fork 0
Code Activity

gnu: alacritty: Fix on Wayland.

Browse source 
* gnu/packages/terminals.scm (alacritty)[arguments]: Wrap alacritty to
find libwayland-client and libxkbcommon.
This commit is contained in:
Tobias Geerinckx-Rice 2020-08-10 19:40:12 +02:00
parent 8c3cc4839a
commit ec36caf510
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79
1 changed files with 14 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
gnu/packages/terminals.scm
View file

@ -1236,21 +1236,29 @@ made by suckless.")
(replace 'install (replace 'install
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin"))
(share (string-append out "/share")) (share (string-append out "/share"))
(icons (string-append share "/icons/hicolor/scalable/apps")) (icons (string-append share "/icons/hicolor/scalable/apps"))
(tic (string-append (assoc-ref inputs "ncurses") "/bin/tic")) (tic (string-append (assoc-ref inputs "ncurses") "/bin/tic"))
(man (string-append share "/man/man1")) (man (string-append share "/man/man1"))
(alacritty-bin "target/release/alacritty")) (alacritty-bin "target/release/alacritty"))
;; Install binary ;; Install and wrap the binary.
(install-file alacritty-bin (string-append out "/bin")) (install-file alacritty-bin bin)
(wrap-program (string-append bin "/alacritty")
;; Both libraries are dlopen()d by cargo dependencies above
;; when running Alacritty on pure Wayland.
;; XXX Find out how to patch these at the source.
`("LD_LIBRARY_PATH" ":" prefix
(,(string-append (assoc-ref inputs "libxkbcommon") "/lib:"
(assoc-ref inputs "wayland") "/lib"))))
;; Install man pages ;; Install man pages.
(mkdir-p man) (mkdir-p man)
(copy-file "extra/alacritty.man" (copy-file "extra/alacritty.man"
(string-append man "/alacritty.1")) (string-append man "/alacritty.1"))
;; Install desktop file ;; Install desktop file.
(install-file "extra/linux/alacritty.desktop" (install-file "extra/linux/alacritty.desktop"
(string-append share "/applications")) (string-append share "/applications"))
@ -1259,7 +1267,7 @@ made by suckless.")
(copy-file "extra/logo/alacritty-term.svg" (copy-file "extra/logo/alacritty-term.svg"
(string-append icons "/Alacritty.svg")) (string-append icons "/Alacritty.svg"))
;; Install terminfo ;; Install terminfo.
(mkdir-p (string-append share "/terminfo")) (mkdir-p (string-append share "/terminfo"))
;; We don't compile alacritty-common entry because ;; We don't compile alacritty-common entry because
;; it's being used only for inheritance. ;; it's being used only for inheritance.
@ -1267,7 +1275,7 @@ made by suckless.")
"-o" (string-append share "/terminfo/") "-o" (string-append share "/terminfo/")
"extra/alacritty.info") "extra/alacritty.info")
;; Install completions ;; Install completions.
(install-file (install-file
"extra/completions/alacritty.bash" "extra/completions/alacritty.bash"
(string-append out "/etc/bash_completion.d")) (string-append out "/etc/bash_completion.d"))