[shepherd] branch devel updated: herd: Fix variable shadowing.

[Ludovic Courtès]

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

civodul pushed a commit to branch devel
in repository shepherd.

The following commit(s) were added to refs/heads/devel by this push:
     new d8d96fc  herd: Fix variable shadowing.
d8d96fc is described below

commit d8d96fc28c49c624323b2f9f5cb01c4fc18a4afd
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Tue Apr 2 14:54:38 2024 +0200

    herd: Fix variable shadowing.
    
    This is a followup to a32107ae5a7427d528d984f57f9ef11b66a6abb7.
    
    * modules/shepherd/scripts/herd.scm (display-status-summary): Rename
    ‘highlight’ to ‘maybe-highlight’ to avoid name clash.
---
 modules/shepherd/scripts/herd.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/modules/shepherd/scripts/herd.scm 
b/modules/shepherd/scripts/herd.scm
index a0acaff..3442d22 100644
--- a/modules/shepherd/scripts/herd.scm
+++ b/modules/shepherd/scripts/herd.scm
@@ -154,13 +154,13 @@ transient status for too long."
     (unless (null? services)
       (display header)
       (for-each (lambda (service)
-                  (define highlight
+                  (define maybe-highlight
                     (if (live-service-pending-replacement? service)
                         highlight
                         (highlight-if-long-transient-status service)))
 
                   (format #t " ~a ~a~%" bullet
-                          (highlight
+                          (maybe-highlight
                            (symbol->string
                             (live-service-canonical-name service)))))
                 (sort services service<?))))      ;get deterministic output