ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-26 20:49:29 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: glfw: Patch dlopen calls.

Browse source 
* gnu/packages/gl.scm (glfw) [arguments]: Add #:modules and #:phases argument.
[inputs]: New field.
This commit is contained in:
Maxim Cournoyer 2023-09-26 10:39:42 -04:00
parent bf946ad591
commit e5f27fdfb3
No known key found for this signature in database
GPG key ID: 1260E46482E63562
1 changed files with 44 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

50
gnu/packages/gl.scm
View file

@ -12,7 +12,7 @@
;;; Copyright © 2019 Pierre Neidhardt <mail@ambrevar.xyz>
;;; Copyright © 2020 Marius Bakke <mbakke@fastmail.com>
;;; Copyright © 2020 Giacomo Leidi <goodoldpaul@autistici.org>
;;; Copyright © 2020, 2021, 2022 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;; Copyright © 2020, 2021, 2022, 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;; Copyright © 2020 Kei Kebreau <kkebreau@posteo.net>
;;; Copyright © 2021 Ivan Gankevich <i.gankevich@spbu.ru>
;;; Copyright © 2021, 2022, 2023 John Kehayias <john.kehayias@protonmail.com>
@ -883,12 +883,50 @@ (define-public glfw
"1kcrpl4d6b6h23ib5j9q670d9w3knd07whgbanbmwwhbcqnc9lmv"))))
(build-system cmake-build-system)
(arguments
'(#:tests? #f ; no test target
#:configure-flags '("-DBUILD_SHARED_LIBS=ON")))
(native-inputs
(list doxygen unzip))
(list
#:modules '((guix build cmake-build-system)
(guix build utils)
(ice-9 format))
#:tests? #f ;no test target
#:configure-flags #~(list "-DBUILD_SHARED_LIBS=ON")
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'patch-sonames
(lambda* (#:key inputs #:allow-other-keys)
(let-syntax ((patch-sonames
(syntax-rules ()
((_ (file ...) soname ...)
(substitute* (list file ...)
(((format #f "(~@{~a~^|~})" soname ...) lib)
(search-input-file
inputs (string-append
"lib/" lib))))))))
;; Avoid looking in LD_LIBRARY_PATH for dlopen calls.
(patch-sonames ("src/egl_context.c"
"src/glx_context.c"
"src/vulkan.c"
"src/wl_init.c"
"src/x11_init.c")
"libEGL.so.1"
"libGL.so"
"libGL.so.1"
"libGLESv1_CM.so.1"
"libGLESv2.so.2"
"libvulkan.so.1"
"libwayland-cursor.so.0"
"libwayland-egl.so.1"
"libxkbcommon.so.0"
"libXxf86vm.so.1"
"libXi.so.6"
"libXrandr.so.2"
"libXcursor.so.1"
"libXinerama.so.1"
"libX11-xcb.so.1"
"libXrender.so.1")))))))
(native-inputs (list doxygen unzip))
(inputs (list libxkbcommon wayland vulkan-loader))
(propagated-inputs
(list mesa ;included in public headers
(list mesa ;included in public headers
;; These are in 'Requires.private' of 'glfw3.pc'.
libx11
libxrandr