1
0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 21:20:33 +02:00

hg-download: Pass strings to ‘hg-fetch’.

Fixes a regression introduced in
275f279891.

* guix/hg-download.scm (hg-fetch-builder): Remove calls to
‘string->symbol’.

Change-Id: I2e049d1ecb8860b6f946ca51358aaba22bdc9e2e
This commit is contained in:
Ludovic Courtès
2024-06-12 09:42:25 +02:00
parent 30f0faafc4
commit bb73faea02

View File

@@ -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)