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 @@ (define (manifest-entry-with-provenance entry) "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