02/02: gnu: openshot: Enable tests.

[guix-commits]

efraim pushed a commit to branch master
in repository guix.

commit e7228f0cfaf7b09f895111886a4df6aa53812ecd
Author: Efraim Flashner <address@hidden>
AuthorDate: Wed Apr 1 22:15:50 2020 +0300

    gnu: openshot: Enable tests.
    
    * gnu/packages/video.scm (openshot)[arguments]: Add custom 'check phase.
---
 gnu/packages/video.scm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm
index fcd9c9a..c62e651 100644
--- a/gnu/packages/video.scm
+++ b/gnu/packages/video.scm
@@ -3681,14 +3681,17 @@ API.  It includes bindings for Python, Ruby, and other 
languages.")
        ("python-requests" ,python-requests)
        ("qtsvg" ,qtsvg)))
     (arguments
-     `(#:tests? #f                      ;no tests
-       #:modules ((guix build python-build-system)
+     `(#:modules ((guix build python-build-system)
                   (guix build qt-utils)
                   (guix build utils))
        #:imported-modules (,@%python-build-system-modules
                             (guix build qt-utils))
        #:phases (modify-phases %standard-phases
                   (delete 'build)       ;install phase does all the work
+                  (replace 'check
+                    (lambda _
+                      (setenv "QT_QPA_PLATFORM" "offscreen")
+                      (invoke "python" "src/tests/query_tests.py")))
                   (add-after 'unpack 'patch-font-location
                     (lambda* (#:key inputs #:allow-other-keys)
                       (let ((font (assoc-ref inputs "font-ubuntu")))