me
/
guix
Archived
1
0
Fork 0
Code

gnu: enlightenment: Patch dlopen of ddcutil. 

* gnu/packages/enlightenment.scm (enlightenment)[inputs]: Add ddcutil.
[arguments]: Adjust custom 'set-system-actions phase to patch dlopen of
libddcutil.
master
Efraim Flashner 2022-02-08 12:14:11 +02:00
parent 8b8fdeafc2
commit 71438cd422
No known key found for this signature in database
GPG Key ID: 41AAE7DCCA3D8351
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gnu/packages/enlightenment.scm
View File

@ -48,6 +48,7 @@
#:use-module (gnu packages gnome) #:use-module (gnu packages gnome)
#:use-module (gnu packages gstreamer) #:use-module (gnu packages gstreamer)
#:use-module (gnu packages gtk) #:use-module (gnu packages gtk)
#:use-module (gnu packages hardware)
#:use-module (gnu packages ibus) #:use-module (gnu packages ibus)
#:use-module (gnu packages image) #:use-module (gnu packages image)
#:use-module (gnu packages libunwind) #:use-module (gnu packages libunwind)
@ -313,6 +314,7 @@ Libraries with some extra bells and whistles.")
(setxkbmap (assoc-ref inputs "setxkbmap")) (setxkbmap (assoc-ref inputs "setxkbmap"))
(libc (assoc-ref inputs "libc")) (libc (assoc-ref inputs "libc"))
(bc (assoc-ref inputs "bc")) (bc (assoc-ref inputs "bc"))
(ddcutil (assoc-ref inputs "ddcutil"))
(efl (assoc-ref inputs "efl"))) (efl (assoc-ref inputs "efl")))
;; We need to patch the path to 'base.lst' to be able ;; We need to patch the path to 'base.lst' to be able
;; to switch the keyboard layout in E. ;; to switch the keyboard layout in E.
@ -338,6 +340,9 @@ Libraries with some extra bells and whistles.")
"/run/current-system/profile/sbin"))) "/run/current-system/profile/sbin")))
(substitute* "src/modules/everything/evry_plug_calc.c" (substitute* "src/modules/everything/evry_plug_calc.c"
(("bc -l") (string-append bc "/bin/bc -l"))) (("bc -l") (string-append bc "/bin/bc -l")))
(substitute* "src/bin/system/e_system_ddc.c"
(("libddcutil\\.so\\.?" libddcutil)
(string-append ddcutil "/lib/" libddcutil)))
(substitute* "data/etc/meson.build" (substitute* "data/etc/meson.build"
(("/bin/mount") "/run/setuid-programs/mount") (("/bin/mount") "/run/setuid-programs/mount")
(("/bin/umount") "/run/setuid-programs/umount") (("/bin/umount") "/run/setuid-programs/umount")
@ -352,6 +357,7 @@ Libraries with some extra bells and whistles.")
("bc" ,bc) ("bc" ,bc)
("bluez" ,bluez) ("bluez" ,bluez)
("dbus" ,dbus) ("dbus" ,dbus)
("ddcutil" ,ddcutil)
("freetype" ,freetype) ("freetype" ,freetype)
("libdrm" ,libdrm) ("libdrm" ,libdrm)
("libexif" ,libexif) ("libexif" ,libexif)