From 1fc346de4eb6881c087eae2c603a761b510e28f2 Mon Sep 17 00:00:00 2001
From: Tobias Geerinckx-Rice <me@tobias.gr>
Date: Thu, 4 Oct 2018 05:45:02 +0200
Subject: [PATCH] gnu: retroarch: Don't use unstable tarball.

* gnu/packages/emulators.scm (retroarch)[source]: Use GIT-FETCH and GIT-FILE-NAME.
---
 gnu/packages/emulators.scm | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/gnu/packages/emulators.scm b/gnu/packages/emulators.scm
index 443137f141..a07ce29243 100644
--- a/gnu/packages/emulators.scm
+++ b/gnu/packages/emulators.scm
@@ -1058,12 +1058,13 @@ (define-public retroarch
     (version "1.7.4")
     (source
      (origin
-       (method url-fetch)
-       (uri (string-append "https://github.com/libretro/RetroArch/archive/v"
-                           version ".tar.gz"))
-       (file-name (string-append name "-" version ".tar.gz"))
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/libretro/RetroArch.git")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
        (sha256
-        (base32 "0h6y2hpjg4b470jvn9ghwp0k3a527sbb6xhia17frlm9w9v5028w"))))
+        (base32 "1gagdwydj6kl3gzi9z1rjgrbjvi325f8159fdaryzf5gjj8avp8m"))))
     (build-system gnu-build-system)
     (arguments
      `(#:tests? #f                      ; no tests