gnu: python-glcontext: Move to python-graphics.

* gnu/packages/python-xyz.scm (python-glcontext): Move from here ...
* gnu/packages/python-graphics.scm: ... to here.

Change-Id: If984a8b0c128df8bcaffae2cce8d9caabda7890b

2 files changed, 65 insertions, 56 deletions

diff --git a/gnu/packages/python-graphics.scm b/gnu/packages/python-graphics.scm
index d0b4a1df74e..29b199922c9 100644
--- a/gnu/packages/python-graphics.scm
+++ b/gnu/packages/python-graphics.scm
@@ -1,8 +1,9 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2021 Adam Kandur <kefironpremise@gmail.com>
-;;; Copyright © 2021 Daniel Meißner <daniel.meissner-i4k@ruhr-uni-bochum.de>
 ;;; Copyright © 2021 Morgan Smith <Morgan.J.Smith@outlook.com>
+;;; Copyright © 2021, 2023 Daniel Meißner <daniel.meissner-i4k@ruhr-uni-bochum.de>
 ;;; Copyright © 2023 Adam Faiz <adam.faiz@disroot.org>
+;;; Copyright © 2023 Simon Tournier <zimon.toutoune@gmail.com>
 ;;; Copyright © 2024 Sharlatan Hellseher <sharlatanus@gmail.com>
 
 (define-module (gnu packages python-graphics)
@@ -11,6 +12,7 @@
   #:use-module (guix build-system pyproject)
   #:use-module (guix download)
   #:use-module (guix gexp)
+  #:use-module (guix git-download)
   #:use-module (guix packages)
   #:use-module (gnu packages)
   #:use-module (gnu packages audio)
@@ -35,6 +37,68 @@
 ;;;
 ;;; Code:
 
+(define-public python-glcontext
+  (let (;; Upstream is known for abusing mutable tag, hence pinpoint the
+        ;; relevant commit.
+        (revision "2")
+        (commit "f2875abdb18b24e785c3958cc22845c81725d5cd"))
+    (package
+      (name "python-glcontext")
+      (version (git-version "3.0.0" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url "https://github.com/moderngl/glcontext")
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "15pngnc4agdvm8crq782vjlb5v1qrclln5xpqiyhz3jhmipsqb8q"))))
+      (build-system pyproject-build-system)
+      (arguments
+       (list
+        #:phases
+        #~(modify-phases %standard-phases
+            (add-before 'build 'fix-lib-paths
+              (lambda* (#:key inputs outputs #:allow-other-keys)
+                (let ((mesa (assoc-ref inputs "mesa"))
+                      (libx11 (assoc-ref inputs "libx11")))
+                  (substitute* '("glcontext/x11.cpp"
+                                 "glcontext/egl.cpp")
+                    (("\"libGL.so\"")
+                     (string-append "\"" mesa "/lib/libGL.so\""))
+                    (("\"libEGL.so\"")
+                     (string-append "\"" mesa "/lib/libEGL.so\""))
+                    (("\"libX11.so\"")
+                     (string-append "\"" libx11 "/lib/libX11.so\"")))
+                  (substitute* '("glcontext/__init__.py")
+                    (("find_library\\('GL'\\)")
+                     (string-append "'" mesa "/lib/libGL.so'"))
+                    (("find_library\\('EGL'\\)")
+                     (string-append "'" mesa "/lib/libEGL.so'"))
+                    (("find_library\\(\"X11\"\\)")
+                     (string-append "'" libx11 "/lib/libX11.so'"))))))
+            (replace 'check
+              (lambda* (#:key inputs outputs tests? #:allow-other-keys)
+                (when tests?
+                  (system "Xvfb :1 &")
+                  (setenv "DISPLAY" ":1")
+                  (add-installed-pythonpath inputs outputs)
+                  (invoke "pytest" "tests")))))))
+      (inputs
+       (list libx11
+             mesa))
+      (native-inputs
+       (list python-psutil
+             python-pytest
+             xorg-server-for-tests))
+      (home-page "https://github.com/moderngl/glcontext")
+      (synopsis "Portable OpenGL Context for ModernGL")
+      (description
+       "Python-glcontext is a library providing an OpenGL implementation for
+ModernGL on multiple platforms.")
+      (license license:expat))))
+
 (define-public python-pyglet
   (package
     (name "python-pyglet")
diff --git a/gnu/packages/python-xyz.scm b/gnu/packages/python-xyz.scm
index 452e35713d7..8849096026c 100644
--- a/gnu/packages/python-xyz.scm
+++ b/gnu/packages/python-xyz.scm
@@ -25567,61 +25567,6 @@ library.")
     (description
      "This is the Cython-coded accelerator module for PyOpenGL.")))
 
-(define-public python-glcontext
-  (let (;; Upstream is known for abusing mutable tag, hence pinpoint the
-        ;; relevant commit.
-        (revision "2")
-        (commit "f2875abdb18b24e785c3958cc22845c81725d5cd"))
-    (package
-      (name "python-glcontext")
-      (version (git-version "3.0.0" revision commit))
-      (source (origin
-                (method git-fetch)
-                (uri (git-reference
-                      (url "https://github.com/moderngl/glcontext")
-                      (commit commit)))
-                (file-name (git-file-name name version))
-                (sha256
-                 (base32
-                  "15pngnc4agdvm8crq782vjlb5v1qrclln5xpqiyhz3jhmipsqb8q"))))
-      (build-system pyproject-build-system)
-      (arguments
-       (list #:phases #~(modify-phases %standard-phases
-                          (add-before 'build 'fix-lib-paths
-                            (lambda* (#:key inputs outputs #:allow-other-keys)
-                              (let ((mesa (assoc-ref inputs "mesa"))
-                                    (libx11 (assoc-ref inputs "libx11")))
-                                (substitute* '("glcontext/x11.cpp"
-                                               "glcontext/egl.cpp")
-                                  (("\"libGL.so\"")
-                                   (string-append "\"" mesa "/lib/libGL.so\""))
-                                  (("\"libEGL.so\"")
-                                   (string-append "\"" mesa "/lib/libEGL.so\""))
-                                  (("\"libX11.so\"")
-                                   (string-append "\"" libx11 "/lib/libX11.so\"")))
-                                (substitute* '("glcontext/__init__.py")
-                                  (("find_library\\('GL'\\)")
-                                   (string-append "'" mesa "/lib/libGL.so'"))
-                                  (("find_library\\('EGL'\\)")
-                                   (string-append "'" mesa "/lib/libEGL.so'"))
-                                  (("find_library\\(\"X11\"\\)")
-                                   (string-append "'" libx11 "/lib/libX11.so'"))))))
-                          (replace 'check
-                            (lambda* (#:key inputs outputs tests?
-                                      #:allow-other-keys)
-                              (when tests?
-                                (system "Xvfb :1 &")
-                                (setenv "DISPLAY" ":1")
-                                (add-installed-pythonpath inputs outputs)
-                                (invoke "pytest" "tests")))))))
-      (inputs (list libx11 mesa))
-      (native-inputs (list xorg-server-for-tests python-pytest python-psutil))
-      (home-page "https://github.com/moderngl/glcontext")
-      (synopsis "Portable OpenGL Context for ModernGL")
-      (description "Python-glcontext is a library providing an OpenGL
-implementation for ModernGL on multiple platforms.")
-      (license license:expat))))
-
 (define-public python-rencode
   (package
    (name "python-rencode")