From f586c877054f68d267c29f743933a79bd16b95bb Mon Sep 17 00:00:00 2001
From: Mark H Weaver <mhw@netris.org>
Date: Fri, 27 Feb 2015 12:23:27 -0500
Subject: [PATCH] gnu: Add 'file-name' fields for github source tarballs
 without a name.

* gnu/packages/aarddict.scm (aarddict), gnu/packages/algebra.scm (arb),
  gnu/packages/audio.scm (jack-2, lvtk),
  gnu/packages/bioinformatics.scm (bedops, bedtools, bowtie),
  gnu/packages/game-development.scm (tiled),
  gnu/packages/games.scm (minetest-data, minetest, retroarch),
  gnu/packages/jrnl.scm (jrnl), gnu/packages/kde.scm (qjson),
  gnu/packages/libevent.scm (libuv), gnu/packages/linux.scm (pflask),
  gnu/packages/mail.scm (offlineimap, libetpan),
  gnu/packages/maths.scm (arpack-ng), gnu/packages/ninja.scm (ninja),
  gnu/packages/nutrition.scm (gourmet),
  gnu/packages/python.scm (python-cairocffi), gnu/packages/rdf.scm (lrdf),
  gnu/packages/ruby.scm (ruby-i18n), gnu/packages/sxiv.scm (sxiv): Add
  'file-name' field to origin.
---
 gnu/packages/aarddict.scm         | 1 +
 gnu/packages/algebra.scm          | 1 +
 gnu/packages/audio.scm            | 2 ++
 gnu/packages/bioinformatics.scm   | 3 +++
 gnu/packages/game-development.scm | 2 ++
 gnu/packages/games.scm            | 3 +++
 gnu/packages/jrnl.scm             | 2 ++
 gnu/packages/kde.scm              | 1 +
 gnu/packages/libevent.scm         | 1 +
 gnu/packages/linux.scm            | 1 +
 gnu/packages/mail.scm             | 2 ++
 gnu/packages/maths.scm            | 1 +
 gnu/packages/ninja.scm            | 1 +
 gnu/packages/nutrition.scm        | 2 ++
 gnu/packages/python.scm           | 1 +
 gnu/packages/rdf.scm              | 1 +
 gnu/packages/ruby.scm             | 3 ++-
 gnu/packages/sxiv.scm             | 1 +
 18 files changed, 28 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/aarddict.scm b/gnu/packages/aarddict.scm
index 33bd7b4ac9..76c7aa4f33 100644
--- a/gnu/packages/aarddict.scm
+++ b/gnu/packages/aarddict.scm
@@ -33,6 +33,7 @@
       (method url-fetch)
       (uri (string-append "https://github.com/aarddict/desktop/archive/"
                           version ".tar.gz"))
+      (file-name (string-append name "-" version ".tar.gz"))
       (sha256
        (base32
         "12h7m0z7nd7rg8avpi9syd265k0rhh4vbdh464nq0jzdg8m9p28c"))))
diff --git a/gnu/packages/algebra.scm b/gnu/packages/algebra.scm
index 2fe26a4878..da8dab9318 100644
--- a/gnu/packages/algebra.scm
+++ b/gnu/packages/algebra.scm
@@ -215,6 +215,7 @@ fast arithmetic.")
             (uri (string-append
                   "https://github.com/fredrik-johansson/arb/archive/"
                   version ".tar.gz"))
+            (file-name (string-append name "-" version ".tar.gz"))
             (sha256 (base32
                      "0a8cgzznkmr59ngj4di9a37b5h4i00gbnixnxlwd34bcbflvjzyr"))))
    (build-system gnu-build-system)
diff --git a/gnu/packages/audio.scm b/gnu/packages/audio.scm
index bc21c9f1f9..42449e89c9 100644
--- a/gnu/packages/audio.scm
+++ b/gnu/packages/audio.scm
@@ -284,6 +284,7 @@ synchronous execution of all clients, and low latency operation.")
                    "https://github.com/jackaudio/jack2/archive/v"
                    version
                    ".tar.gz"))
+             (file-name (string-append name "-" version ".tar.gz"))
              (sha256
               (base32
                "03b0iiyk3ng3vh5s8gaqwn565vik7910p56mlbk512bw3dhbdwc8"))))
@@ -507,6 +508,7 @@ software.")
              (uri (string-append "https://github.com/lvtk/lvtk/archive/"
                                  version
                                  ".tar.gz"))
+             (file-name (string-append name "-" version ".tar.gz"))
              (sha256
               (base32
                "03nbj2cqcklqwh50zj2gwm07crh5iwqbpxbpzwbg5hvgl4k4rnjd"))))
diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm
index dbafd94c2f..f6df298db5 100644
--- a/gnu/packages/bioinformatics.scm
+++ b/gnu/packages/bioinformatics.scm
@@ -43,6 +43,7 @@
               (method url-fetch)
               (uri (string-append "https://github.com/bedops/bedops/archive/v"
                                   version ".tar.gz"))
+              (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
                 "0wmg6j0icimlrnsidaxrzf3hfgjvlkkcwvpdg7n4gg7hdv2m9ni5"))))
@@ -100,6 +101,7 @@ computational cluster.")
               (method url-fetch)
               (uri (string-append "https://github.com/arq5x/bedtools2/archive/v"
                                   version ".tar.gz"))
+              (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
                 "16aq0w3dmbd0853j32xk9jin4vb6v6fgakfyvrsmsjizzbn3fpfl"))))
@@ -149,6 +151,7 @@ BED, GFF/GTF, VCF.")
               (method url-fetch)
               (uri (string-append "https://github.com/BenLangmead/bowtie2/archive/v"
                                   version ".tar.gz"))
+              (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
                 "15dnbqippwvhyh9zqjhaxkabk7lm1xbh1nvar1x4b5kwm117zijn"))
diff --git a/gnu/packages/game-development.scm b/gnu/packages/game-development.scm
index fefdf67f3d..0e6a1d5b89 100644
--- a/gnu/packages/game-development.scm
+++ b/gnu/packages/game-development.scm
@@ -1,5 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2014 Tomáš Čech <sleep_walker@suse.cz>
+;;; Copyright © 2015 Mark H Weaver <mhw@netris.org>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -58,6 +59,7 @@ is used in some video games and movies.")
               (method url-fetch)
               (uri (string-append "https://github.com/bjorn/tiled/archive/v"
                                   version ".tar.gz"))
+              (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
                 "03a15vbzjfwc8dpifbjvd0gnr208mzmdkgs2nlc8zq6z0a4h4jqd"))))
diff --git a/gnu/packages/games.scm b/gnu/packages/games.scm
index 789a02e577..5843ca660d 100644
--- a/gnu/packages/games.scm
+++ b/gnu/packages/games.scm
@@ -606,6 +606,7 @@ for common mesh file formats, and collision detection.")
               (uri (string-append
                     "https://github.com/minetest/minetest_game/archive/"
                     version ".tar.gz"))
+              (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
                 "0hzb27srv6f2j84dpxx2p0p0aaq9vdp5jvbrfpklb5q5ssdjxvc6"))))
@@ -646,6 +647,7 @@ for common mesh file formats, and collision detection.")
               (uri (string-append
                     "https://github.com/minetest/minetest/archive/"
                     version ".tar.gz"))
+              (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
                 "0h223svzkvp63b77nqfxy7k8whw4543gahs3kxd3x4myi5ax5z5f"))))
@@ -792,6 +794,7 @@ reference interpreter, using Glk API.")
        (method url-fetch)
        (uri (string-append "https://github.com/libretro/RetroArch/archive/"
                            version ".tar.gz"))
+       (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "1iqcrb076xiih20sk8n1w79xsp4fb8pj4vkmdc1xn562h56y4nxx"))))
     (build-system gnu-build-system)
diff --git a/gnu/packages/jrnl.scm b/gnu/packages/jrnl.scm
index bdd4471c41..26401f8da9 100644
--- a/gnu/packages/jrnl.scm
+++ b/gnu/packages/jrnl.scm
@@ -1,5 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2014 Eric Bavier <address@hidden>
+;;; Copyright © 2015 Mark H Weaver <mhw@netris.org>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -32,6 +33,7 @@
       (method url-fetch)
       (uri (string-append "https://github.com/maebert/jrnl/archive/"
                           version ".tar.gz"))
+      (file-name (string-append name "-" version ".tar.gz"))
       (sha256
        (base32
         "019ky09sj5i7frmca0imv4jm46mn3f4lzah2wmiwxh22cisj7ksn"))))
diff --git a/gnu/packages/kde.scm b/gnu/packages/kde.scm
index 96acf0a573..c6556865c2 100644
--- a/gnu/packages/kde.scm
+++ b/gnu/packages/kde.scm
@@ -96,6 +96,7 @@
              (method url-fetch)
              (uri (string-append "https://github.com/flavio/qjson/archive/"
                                  version ".tar.gz"))
+             (file-name (string-append name "-" version ".tar.gz"))
              (sha256
               (base32
                "163fspi0xc705irv79qw861fmh68pjyla9vx3kqiq6xrdhb9834j"))))
diff --git a/gnu/packages/libevent.scm b/gnu/packages/libevent.scm
index 2afae3f302..a48c524779 100644
--- a/gnu/packages/libevent.scm
+++ b/gnu/packages/libevent.scm
@@ -68,6 +68,7 @@ loop.")
               (method url-fetch)
               (uri (string-append "https://github.com/joyent/libuv/archive/v"
                                   version ".tar.gz"))
+              (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
                 "1ys2wlypdbv59yywn91d5vl329z50mi7ivi3fj5rjm4mr9g3wnmr"))))
diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index b7eedc6be2..4bd3592672 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -1851,6 +1851,7 @@ particular the 'perf' command.")
               (method url-fetch)
               (uri (string-append "https://github.com/ghedo/pflask/archive/v"
                                   version ".tar.gz"))
+              (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
                 "1g8fjj67dfkc2s0852l9vqi1pm61gp4rxbpzbzg780f5s5hd1fys"))))
diff --git a/gnu/packages/mail.scm b/gnu/packages/mail.scm
index 17988cc4f9..0dfc282ea8 100644
--- a/gnu/packages/mail.scm
+++ b/gnu/packages/mail.scm
@@ -283,6 +283,7 @@ and corrections.  It is based on a Bayesian filter.")
               (method url-fetch)
               (uri (string-append "https://github.com/OfflineIMAP/offlineimap/"
                                   "archive/v" version ".tar.gz"))
+              (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
                 "00k84qagph3xnxss6rkxm61x07ngz8fvffx4z9jyw5baf3cdd32p"))))
@@ -416,6 +417,7 @@ useful features.")
              (method url-fetch)
              (uri (string-append "https://github.com/dinhviethoa/" name
                    "/archive/" version ".tar.gz"))
+             (file-name (string-append name "-" version ".tar.gz"))
              (sha256
                (base32 "05qyqx2c1ppb1jnrs3m52i60f9xlxfxdmb9dnwg4vqjv8kwv2qkr"))))
     (build-system gnu-build-system)
diff --git a/gnu/packages/maths.scm b/gnu/packages/maths.scm
index 8c4eb3bd2f..e3e6e59e47 100644
--- a/gnu/packages/maths.scm
+++ b/gnu/packages/maths.scm
@@ -222,6 +222,7 @@ be output in text, PostScript, PDF or HTML.")
        (method url-fetch)
        (uri (string-append "https://github.com/opencollab/arpack-ng/archive/"
                            version ".tar.gz"))
+       (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32
          "1fwch6vipms1ispzg2djvbzv5wag36f1dmmr3xs3mbp6imfyhvff"))))
diff --git a/gnu/packages/ninja.scm b/gnu/packages/ninja.scm
index 7416b67d02..2483cc51fe 100644
--- a/gnu/packages/ninja.scm
+++ b/gnu/packages/ninja.scm
@@ -32,6 +32,7 @@
               (method url-fetch)
               (uri (string-append "https://github.com/martine/ninja/"
                                   "archive/v" version ".tar.gz"))
+              (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
                 "1h3yfwcfl61v493vna6jia2fizh8rpig7qw2504cvkr6gid3p5bw"))
diff --git a/gnu/packages/nutrition.scm b/gnu/packages/nutrition.scm
index 72bd5b0d3e..636379806c 100644
--- a/gnu/packages/nutrition.scm
+++ b/gnu/packages/nutrition.scm
@@ -1,5 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2014 Eric Bavier <bavier@member.fsf.org>
+;;; Copyright © 2015 Mark H Weaver <mhw@netris.org>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -36,6 +37,7 @@
       (method url-fetch)
       (uri (string-append "https://github.com/thinkle/gourmet/archive/"
                           version ".tar.gz"))
+      (file-name (string-append name "-" version ".tar.gz"))
       (sha256
        (base32
         "1qvz175arzqm10lpfx8ffadrgirs3240zzqcp0h7sl53qfwx7v8k"))))
diff --git a/gnu/packages/python.scm b/gnu/packages/python.scm
index 7569770889..e044e1955b 100644
--- a/gnu/packages/python.scm
+++ b/gnu/packages/python.scm
@@ -2678,6 +2678,7 @@ support for Python 3 and PyPy.  It is based on cffi.")
       ;; The archive on pypi is missing the 'utils' directory!
       (uri (string-append "https://github.com/SimonSapin/cairocffi/archive/v"
                           version ".tar.gz"))
+      (file-name (string-append name "-" version ".tar.gz"))
       (sha256
        (base32
         "03w5p62sp3nqiccx864sbq0jvh7946277jqx3rcc3dch5xwfvv51"))))
diff --git a/gnu/packages/rdf.scm b/gnu/packages/rdf.scm
index 8edc2f46fc..a76b2c30ab 100644
--- a/gnu/packages/rdf.scm
+++ b/gnu/packages/rdf.scm
@@ -120,6 +120,7 @@ Java Lucene text search engine API to C++.")
               (method url-fetch)
               (uri (string-append "https://github.com/swh/LRDF/archive/"
                                   version ".tar.gz"))
+              (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
                 "18p2flb2sv2hq6w2qkd29z9c7knnwqr3f12i2srshlzx6vwkm05s"))))
diff --git a/gnu/packages/ruby.scm b/gnu/packages/ruby.scm
index 7fc799311c..4a4ab5de3b 100644
--- a/gnu/packages/ruby.scm
+++ b/gnu/packages/ruby.scm
@@ -1,7 +1,7 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2014 Pjotr Prins <pjotr.guix@thebird.nl>
 ;;; Copyright © 2014 Ludovic Courtès <ludo@gnu.org>
-;;; Copyright © 2014 Mark H Weaver <mhw@netris.org>
+;;; Copyright © 2014, 2015 Mark H Weaver <mhw@netris.org>
 ;;; Copyright © 2014 David Thompson <davet@gnu.org>
 ;;;
 ;;; This file is part of GNU Guix.
@@ -122,6 +122,7 @@ a focus on simplicity and productivity.")
               (method url-fetch)
               (uri (string-append "https://github.com/svenfuchs/i18n/archive/v"
                                   version ".tar.gz"))
+              (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
                 "1fdhnhh1p5g8vibv44d770z8nq208zrms3m2nswdvr54072y1m6k"))))
diff --git a/gnu/packages/sxiv.scm b/gnu/packages/sxiv.scm
index 4c068e5366..ee5e822c8d 100644
--- a/gnu/packages/sxiv.scm
+++ b/gnu/packages/sxiv.scm
@@ -34,6 +34,7 @@
               (uri (string-append
                     "https://github.com/muennich/sxiv/archive/v"
                     version ".tar.gz"))
+              (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
                 "03hxy5ff7xbs15rhlbpgx8xmvmpjlffp0m4528975hg16sqa2c4s"))))