01/01: gnu: guile-opengl: Patch dynamic-link call for 'libGLU' to glu.

[???]

iyzsong pushed a commit to branch master
in repository guix.

commit 4becc7927320378f8ecbdf111adf57070851f656
Author: 宋文武 <address@hidden>
Date:   Fri Jun 5 12:17:18 2015 +0800

    gnu: guile-opengl: Patch dynamic-link call for 'libGLU' to glu.
    
    * gnu/packages/gl.scm (guile-opengl)[inputs]: Add glu.
      [arguments]: Patch dynamic-link call for 'libGLU' to glu instead of
      mesa in the 'patch-dynamic-link' phase.
---
 gnu/packages/gl.scm |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/gnu/packages/gl.scm b/gnu/packages/gl.scm
index 2a6437c..d1503e1 100644
--- a/gnu/packages/gl.scm
+++ b/gnu/packages/gl.scm
@@ -405,6 +405,7 @@ extension functionality is exposed in a single header 
file.")
     (native-inputs `(("pkg-config" ,pkg-config)))
     (inputs `(("guile" ,guile-2.0)
               ("mesa" ,mesa)
+              ("glu" ,glu)
               ("freeglut" ,freeglut)))
     (arguments
      '(#:phases (alist-cons-before
@@ -419,7 +420,7 @@ extension functionality is exposed in a single header 
file.")
                    ;; Replace dynamic-link calls for libGL, libGLU, and
                    ;; libglut with absolute paths to the store.
                    (dynamic-link-substitute "glx/runtime.scm" "GL" "mesa")
-                   (dynamic-link-substitute "glu/runtime.scm" "GLU" "mesa")
+                   (dynamic-link-substitute "glu/runtime.scm" "GLU" "glu")
                    (dynamic-link-substitute "glut/runtime.scm" "glut"
                                             "freeglut"))
                  %standard-phases)))