From 7bf43a7dd230c6cb38c8e2894f373246434ea1d7 Mon Sep 17 00:00:00 2001 From: Maxim Cournoyer Date: Sun, 23 Nov 2025 11:10:52 +0900 Subject: [PATCH] teams/gnome: Fix doc strings in refresh script. * etc/teams/gnome/gnome-core-refresh (fetch-releng-content): Adjust doc. (parse-releng): Likewise. Change-Id: Ib6081081cb0b3e216e2b807ed0512be4b296528e --- etc/teams/gnome/gnome-core-refresh | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/etc/teams/gnome/gnome-core-refresh b/etc/teams/gnome/gnome-core-refresh index 9271ea3fb19..5b2acd490ed 100755 --- a/etc/teams/gnome/gnome-core-refresh +++ b/etc/teams/gnome/gnome-core-refresh @@ -52,7 +52,8 @@ tools/versions-stable"))) (define (fetch-releng-content) - "Return an input port to the %GNOME-RELENG-VERSIONS-URI file." + "Return a string corresponding to the content of the %GNOME-RELENG-VERSIONS-URI +file." (call-with-port (http-fetch/cached (%gnome-releng-versions-uri)) get-string-all)) @@ -75,8 +76,8 @@ NL < '\n'") '(("adwaita-fonts" . "font-adwaita"))) (define (parse-releng data) - "Return DATA, a string representing the content of a GNOME releng file, and -return the complete parse tree." + "Return the complete parse tree for DATA, a string representing the content of +a GNOME releng file." (let ((tree (peg:tree (match-pattern releng data)))) (match tree (#f (raise-exception (make-releng-parser-error)))