[shepherd] 02/07: comm: The 'arguments' of a command is a list.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository shepherd.

commit 3cb777b7d34d0df5df015104470c7330ae2752f0
Author: Ludovic Courtès <address@hidden>
Date:   Wed Jan 27 14:25:28 2016 +0100

    comm: The 'arguments' of a command is a list.
    
    * modules/shepherd/comm.scm (read-command): Expect 'arguments' to be a
    list.
    (write-command): Send 'arguments' as a list instead of splicing it.
---
 modules/shepherd/comm.scm |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/modules/shepherd/comm.scm b/modules/shepherd/comm.scm
index 08fd689..07d47bb 100644
--- a/modules/shepherd/comm.scm
+++ b/modules/shepherd/comm.scm
@@ -96,7 +96,7 @@ wrong---premature end-of-file, invalid sexp, etc."
         (('shepherd-command ('version 0 _ ...)
                             ('action action)
                             ('service service)
-                            ('arguments args ...)
+                            ('arguments (args ...))
                             ('directory directory))
          (shepherd-command action service
                            #:arguments args
@@ -114,7 +114,7 @@ wrong---premature end-of-file, invalid sexp, etc."
      (write `(shepherd-command (version 0)        ; protocol version
                                (action ,action)
                                (service ,service)
-                               (arguments ,@arguments)
+                               (arguments ,arguments)
                                (directory ,directory))
             port))))