summary refs log tree commit diff
path: root/gnu/packages/gl.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/packages/gl.scm')
-rw-r--r--gnu/packages/gl.scm20
1 files changed, 2 insertions, 18 deletions
diff --git a/gnu/packages/gl.scm b/gnu/packages/gl.scm
index 235b386dad..c89e434ed6 100644
--- a/gnu/packages/gl.scm
+++ b/gnu/packages/gl.scm
@@ -679,25 +679,19 @@ extension functionality is exposed in a single header file.")
 (define-public guile-opengl
   (package
     (name "guile-opengl")
-    (version "0.1.0")
+    (version "0.2.0")
     (source (origin
              (method url-fetch)
              (uri (string-append "mirror://gnu/guile-opengl/guile-opengl-"
                                  version ".tar.gz"))
              (sha256
               (base32
-               "13qfx4xh8baryxqrv986l848ygd0piqwm6s2s90pxk9c0m9vklim"))))
+               "0rbc2wf9x63ilj3n85h8wyllzc2b22abmhs2p2ghjgc253n8gw5q"))))
     (build-system gnu-build-system)
     (native-inputs (list pkg-config))
     (inputs (list guile-2.2 mesa glu freeglut))
     (arguments
      '(#:phases (modify-phases %standard-phases
-                 (add-after 'configure 'patch-makefile
-                   (lambda _
-                     ;; Install compiled Guile files in the expected place.
-                     (substitute* '("Makefile")
-                       (("^godir = .*$")
-                        "godir = $(moddir)\n"))))
                  (add-before 'build 'patch-dynamic-link
                    (lambda* (#:key inputs outputs #:allow-other-keys)
                      (substitute* "gl/runtime.scm"
@@ -728,16 +722,6 @@ OpenGL graphics API.")
   (package
     (inherit guile-opengl)
     (name "guile3.0-opengl")
-    (arguments
-     (substitute-keyword-arguments (package-arguments guile-opengl)
-       ((#:phases phases)
-        `(modify-phases ,phases
-           (add-after 'unpack 'build-with-guile-3.0
-             (lambda _
-               (substitute* "configure"
-                 (("_guile_versions_to_search=\"")
-                  "_guile_versions_to_search=\"3.0 "))
-               #t))))))
     (inputs
      (list guile-3.0 mesa glu freeglut))))