From ce2ba3431a71effa2f9f9f888f0e8ad9e670cb72 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Mon, 22 Feb 2021 23:33:47 +0100
Subject: [PATCH] describe: Fix typo in 'manifest-entry-with-provenance'.

* guix/describe.scm (manifest-entry-with-provenance): Fix first argument
to 'assq'.
---
 guix/describe.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/describe.scm b/guix/describe.scm
index 6a31c707f0..03569b1db4 100644
--- a/guix/describe.scm
+++ b/guix/describe.scm
@@ -182,7 +182,7 @@ property of manifest entries, or #f if it could not be determined."
   "Return ENTRY with an additional 'provenance' property if it's not already
 there."
   (let ((properties (manifest-entry-properties entry)))
-    (if (assq 'properties properties)
+    (if (assq 'provenance properties)
         entry
         (let ((item (manifest-entry-item entry)))
           (manifest-entry