From a1639ae9de39d5ce47e6ddfd87e792db52b44bd6 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Wed, 11 Apr 2018 00:29:47 +0200
Subject: [PATCH] self: 'package-for-guile' really honors GUILE-VERSION.

* guix/self.scm (package-for-guile): Pass GUILE-VERSION to
'false-if-wrong-guile'.
---
 guix/self.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/self.scm b/guix/self.scm
index dd61322a54..0730cd850d 100644
--- a/guix/self.scm
+++ b/guix/self.scm
@@ -69,7 +69,7 @@ (define (package-for-guile guile-version . names)
          (#f
           (loop rest))
          ((? package? package)
-          (or (false-if-wrong-guile package)
+          (or (false-if-wrong-guile package guile-version)
               (loop rest))))))))
 
 (define specification->package