From 3d520b542855e7e3bdf42235253a14cbc55178dd Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Sat, 28 Jan 2017 17:17:13 +0100
Subject: gnu-maintenance: 'gnu-package?' uses 'eq?' memoization.

* guix/gnu-maintenance.scm (gnu-package?): Use 'mlambdaq' instead of
'mlambda'.
---
 guix/gnu-maintenance.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'guix/gnu-maintenance.scm')

diff --git a/guix/gnu-maintenance.scm b/guix/gnu-maintenance.scm
index 012f587525..07e6909641 100644
--- a/guix/gnu-maintenance.scm
+++ b/guix/gnu-maintenance.scm
@@ -166,7 +166,7 @@ found."
 
 (define gnu-package?
   (let ((official-gnu-packages (memoize official-gnu-packages)))
-    (mlambda (package)
+    (mlambdaq (package)
       "Return true if PACKAGE is a GNU package.  This procedure may access the
 network to check in GNU's database."
       (define (mirror-type url)
-- 
cgit v1.2.3