branch master updated: hg-download: Pass strings to ‘hg-fetch’.

[guix-commits]

This is an automated email from the git hooks/post-receive script.

civodul pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new bb73faea02 hg-download: Pass strings to ‘hg-fetch’.
bb73faea02 is described below

commit bb73faea028cc9a15af62cb8ade15d58da51bea2
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Wed Jun 12 09:42:25 2024 +0200

    hg-download: Pass strings to ‘hg-fetch’.
    
    Fixes a regression introduced in
    275f27989175f31e9feb364ed7deac2435b08f68.
    
    * guix/hg-download.scm (hg-fetch-builder): Remove calls to
    ‘string->symbol’.
    
    Change-Id: I2e049d1ecb8860b6f946ca51358aaba22bdc9e2e
---
 guix/hg-download.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/guix/hg-download.scm b/guix/hg-download.scm
index 812017e73d..df48ed6eb7 100644
--- a/guix/hg-download.scm
+++ b/guix/hg-download.scm
@@ -105,8 +105,8 @@
           (setvbuf (current-error-port) 'line)
 
           (or (and (download-method-enabled? 'upstream)
-                   (hg-fetch (string->symbol (getenv "hg ref url"))
-                             (string->symbol (getenv "hg ref changeset"))
+                   (hg-fetch (getenv "hg ref url")
+                             (getenv "hg ref changeset")
                              #$output
                              #:hg-command (string-append #+hg "/bin/hg")))
               (and (download-method-enabled? 'nar)