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

[Ludovic Courtès]

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."
                 %services)
      #f)))
 
-;; 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*