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

build/dbus-service: Fix possible syntax error in 'with-retries'.

When the body was not a single expression, quote would throw a syntax error.

* gnu/build/dbus-service.scm (with-retries): Ensure the body is a single
expression when quoted for the error message.

Change-Id: I44ec61bc26c8959b499bc94eb661762afdaf99ba
This commit is contained in:
Maxim Cournoyer
2025-12-29 18:29:25 +09:00
parent 0c6fe1a1e7
commit 045ee8ec77

View File

@@ -91,7 +91,7 @@ each retry."
((sleep*) delay) ;else wait and retry
(loop (+ 1 attempts)))
(error "maximum number of retry attempts reached"
(quote body ...) args))))))
(quote (begin body ...)) args))))))
;;;