From f856fcb558eb59f9bb0d4b0651bd7508370321f4 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Wed, 4 Nov 2015 00:09:49 +0100
Subject: [PATCH] build-system/python: 'package-with-python2' preserves source
 location.

* guix/build-system/python.scm (package-with-explicit-python): Add
  'location' field.
---
 guix/build-system/python.scm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/guix/build-system/python.scm b/guix/build-system/python.scm
index 1a5d9df473..2532210a49 100644
--- a/guix/build-system/python.scm
+++ b/guix/build-system/python.scm
@@ -92,6 +92,7 @@ (define transform
          (if (eq? (package-build-system p) python-build-system)
              (package
                (inherit p)
+               (location (package-location p))
                (name (let ((name (package-name p)))
                        (string-append new-prefix
                                       (if (string-prefix? old-prefix name)