From 2216b6f4108abfb2f75db7667beaa46ee7d630e8 Mon Sep 17 00:00:00 2001
From: Tobias Geerinckx-Rice <me@tobias.gr>
Date: Fri, 27 Apr 2018 05:13:48 +0200
Subject: [PATCH] gnu: thefuck: Use INVOKE.

* gnu/packages/admin.scm (thefuck)[arguments]: Substitute INVOKE for
SYSTEM* and end phase with explicit #t.
---
 gnu/packages/admin.scm | 3 ++-
 gnu/packages/music.scm | 4 ++--
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index ce4dca67fa..1d9fa7c673 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -1962,7 +1962,8 @@ (define-public thefuck
              (add-installed-pythonpath inputs outputs)
              ;; Some tests need write access to $HOME.
              (setenv "HOME" "/tmp")
-             (zero? (system* "py.test" "-v")))))))
+             (invoke "py.test" "-v")
+             #t)))))
     (propagated-inputs
      `(("python-colorama" ,python-colorama)
        ("python-decorator" ,python-decorator)
diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm
index 6419ad4ca1..7e98fa74cf 100644
--- a/gnu/packages/music.scm
+++ b/gnu/packages/music.scm
@@ -2147,14 +2147,14 @@ (define-public cursynth
 (define-public aj-snapshot
   (package
     (name "aj-snapshot")
-    (version "0.9.7")
+    (version "0.9.8")
     (source (origin
               (method url-fetch)
               (uri (string-append "mirror://sourceforge/aj-snapshot/"
                                   "aj-snapshot-" version ".tar.bz2"))
               (sha256
                (base32
-                "0yxccgp9qw2cyqv719wlbq8wfsr5ga8czvwa7bmb8dh5s11n3rn8"))))
+                "0wilky1g2mb88v2z0520s7sw1dsn10iwanc8id5p6z1xsnhg7b6p"))))
     (build-system gnu-build-system)
     (inputs
      `(("minixml" ,minixml)