[Pkg-gnupg-commit] [gnupg2] 51/124: tests: Fix running python condition.

[Daniel Kahn Gillmor]

This is an automated email from the git hooks/post-receive script.

dkg pushed a commit to branch experimental
in repository gnupg2.

commit a672ddec03f96475866d712b28be18b3fab43aef
Author: NIIBE Yutaka <gniibe at fsij.org>
Date:   Wed Mar 15 16:45:18 2017 +0900

    tests: Fix running python condition.
    
    * tests/gpgme/gpgme-defs.scm (run-python-tests?): We need Python.
    
    Signed-off-by: NIIBE Yutaka <gniibe at fsij.org>
---
 tests/gpgme/gpgme-defs.scm | 13 +++++++------
 1 file changed, 7 insertions(+), 6 deletions(-)

diff --git a/tests/gpgme/gpgme-defs.scm b/tests/gpgme/gpgme-defs.scm
index 2b104f2..0583774 100644
--- a/tests/gpgme/gpgme-defs.scm
+++ b/tests/gpgme/gpgme-defs.scm
@@ -175,9 +175,10 @@
 (define python (catch #f
 		      (path-expand "python" (string-split (getenv "PATH") *pathsep*))))
 (define (run-python-tests?)
-  (let* ((python-version
-	  (string-trim char-whitespace?
-		       (call-popen `(,python -c "import sys; print('{0}.{1}'.format(sys.version_info[0], sys.version_info[1]))") "")))
-	 (build-path (path-join gpgme-builddir "lang" "python"
-				(string-append "python" python-version "-gpg"))))
-    (trace (file-exists? (trace build-path)))))
+  (and python
+       (let* ((python-version
+	       (string-trim char-whitespace?
+			    (call-popen `(,python -c "import sys; print('{0}.{1}'.format(sys.version_info[0], sys.version_info[1]))") "")))
+	      (build-path (path-join gpgme-builddir "lang" "python"
+				     (string-append "python" python-version "-gpg"))))
+	 (trace (file-exists? (trace build-path))))))

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-gnupg/gnupg2.git