build: dbus-service: Quote body argument in 'with-retries' syntax.

Otherwise the code would be evaluated instead of shown.

* gnu/build/dbus-service.scm (with-retries): Quote the body data in the error
message.

Change-Id: I7a06f08327bdc7df70ae56a146855bc32ad3e63e
This commit is contained in:
Maxim Cournoyer 2025-04-14 00:08:03 +09:00
parent e78f8a85bb
commit 25f86fdc4f
No known key found for this signature in database
GPG key ID: 1260E46482E63562

View file

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