[bug#71653] [PATCH] import/github: Honor upstream-name property.

[Dariqq]

* guix/import/github.scm (import-release): Use 'upstream-name if available.

Change-Id: I9a4999a01156ce02584270837ceab70996b49106
---
 guix/import/github.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/guix/import/github.scm b/guix/import/github.scm
index c5556d78ee..164fcde458 100644
--- a/guix/import/github.scm
+++ b/guix/import/github.scm
@@ -328,8 +328,9 @@ (define* (import-release pkg #:key (version #f))
   (let* ((original-uri (origin-uri (package-source pkg)))
          (source-uri (github-uri original-uri))
          (name (package-name pkg))
+         (upstream-name (assoc-ref (package-properties pkg) 'upstream-name))
          (newest-version version-tag
-                         (latest-released-version source-uri name
+                         (latest-released-version source-uri (or upstream-name 
name)
                                                   #:version version)))
     (if newest-version
         (upstream-source

base-commit: c551e406a75273583ae3fef92f32468f905cc07f
-- 
2.45.1