01/02: gnu: retroarch: Use shared zlib.

[Efraim Flashner]

efraim pushed a commit to branch master
in repository guix.

commit fade67ab756602bdeba508fbffa0e35234b58b9c
Author: Efraim Flashner <address@hidden>
Date:   Thu Sep 13 18:39:22 2018 +0300

    gnu: retroarch: Use shared zlib.
    
    * gnu/packages/emulators.scm (retroarch)[arguments]: In custom
    'configure phase, use our zlib instead of vendor's zlib.
---
 gnu/packages/emulators.scm | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/gnu/packages/emulators.scm b/gnu/packages/emulators.scm
index e02339a..f21c322 100644
--- a/gnu/packages/emulators.scm
+++ b/gnu/packages/emulators.scm
@@ -1079,6 +1079,11 @@ emulation community.  It provides highly accurate 
emulation.")
                  (("libvulkan.so") (string-append vulkan "/lib/libvulkan.so")))
                (substitute* "qb/qb.libs.sh"
                  (("/bin/true") (which "true")))
+               ;; Use shared zlib.
+               (substitute* '("libretro-common/file/archive_file_zlib.c"
+                              "libretro-common/streams/trans_stream_zlib.c"
+                              "network/httpserver/httpserver.c")
+                 (("<compat/zlib.h>") "<zlib.h>"))
                ;; The configure script does not yet accept the extra arguments
                ;; (like ‘CONFIG_SHELL=’) passed by the default configure phase.
                (zero? (system*