[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[shepherd] 04/05: service: Add docstring to 'lookup-services'.

From: Ludovic Courtès
Subject: [shepherd] 04/05: service: Add docstring to 'lookup-services'.
Date: Sun, 24 Jan 2016 21:09:30 +0000

civodul pushed a commit to branch master
in repository shepherd.

commit 52729f36ee1fe24698c0814592e980d2488ea3eb
Author: Alex Kost <address@hidden>
Date:   Sun Jan 24 18:33:10 2016 +0300

    service: Add docstring to 'lookup-services'.
    * modules/shepherd/service.scm (lookup-services): Use docstring instead
      of a comment.
    Signed-off-by: Ludovic Courtès <address@hidden>
 modules/shepherd/service.scm |    3 +--
 1 files changed, 1 insertions(+), 2 deletions(-)

diff --git a/modules/shepherd/service.scm b/modules/shepherd/service.scm
index 0a13626..fd9c7e2 100644
--- a/modules/shepherd/service.scm
+++ b/modules/shepherd/service.scm
@@ -845,9 +845,8 @@ Return #f if service is not found."
-;; Lookup the services that provide NAME.  Returns a (possibly empty)
-;; list of those.
 (define (lookup-services name)
+  "Return a (possibly empty) list of services that provide NAME."
   (hashq-ref %services name '()))
 (define waitpid*

reply via email to

[Prev in Thread] Current Thread [Next in Thread]