guix-commits
[Top][All Lists]
Advanced
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

03/07: import: go: Match "go-import" meta tags anywhere.

From: guix-commits
Subject: 03/07: import: go: Match "go-import" meta tags anywhere.
Date: Sat, 18 Sep 2021 17:09:33 -0400 (EDT) 
civodul pushed a commit to branch master
in repository guix.

commit 281ede2e7db73fa0632b80c084bce9611962b353
Author: Sarah Morgensen <iskarian@mgsn.dev>
AuthorDate: Thu Sep 16 18:27:09 2021 -0700

    import: go: Match "go-import" meta tags anywhere.
    
    Some personal sites forget to put <meta name="go-import" ...> in a
    <head> element, so look anywhere for them.
    
    Partly fixes <https://issues.guix.gnu.org/50595>.
    Reported by Stephen Paul Weber <singpolyma@singpolyma.net>.
    
    * guix/import/go.scm (fetch-module-meta-data): Match "go-import" meta
    tags anywhere in the page.
    
    Signed-off-by: Ludovic Courtès <ludo@gnu.org>
---
 guix/import/go.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/import/go.scm b/guix/import/go.scm
index fe7387d..9769b55 100644
--- a/guix/import/go.scm
+++ b/guix/import/go.scm
@@ -480,7 +480,7 @@ build a package."
                          (strip-.git-suffix/maybe repo-url)))))
   ;; <meta name="go-import" content="import-prefix vcs repo-root">
   (let* ((meta-data (http-fetch* (format #f "https://~a?go-get=1"; 
module-path)))
-         (select (sxpath `(// head (meta (@ (equal? (name "go-import"))))
+         (select (sxpath `(// (meta (@ (equal? (name "go-import"))))
                               // content))))
     (match (select (html->sxml meta-data #:strict? #t))
       (() #f)                           ;nothing selected
reply via email to
[Prev in Thread] Current Thread [Next in Thread]