nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

services: lsh: Correctly handle #:interfaces option. 

* gnu/services/ssh.scm (lsh-dmd-service)[lsh-command]: Pass a series of
--interface flags instead of the nonexistent --interfaces option.
This commit is contained in:
Ludovic Courtès 2015-11-27 22:46:27 +01:00
parent 4331f558d7
commit fde40c98f9
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gnu/services/ssh.scm
View File

@ -23,6 +23,7 @@
#:use-module (gnu services dmd) #:use-module (gnu services dmd)
#:use-module (gnu system pam) #:use-module (gnu system pam)
#:use-module (gnu packages lsh) #:use-module (gnu packages lsh)
#:use-module (srfi srfi-26)
#:export (lsh-service)) #:export (lsh-service))
;;; Commentary: ;;; Commentary:
@ -142,8 +143,8 @@
"--tcpip-forward" "--no-tcpip-forward") "--tcpip-forward" "--no-tcpip-forward")
(if (null? interfaces) (if (null? interfaces)
'() '()
(list (string-append "--interfaces=" (map (cut string-append "--interface=" <>)
(string-join interfaces ","))))))) interfaces)))))
(define requires (define requires
(if (and daemonic? (lsh-configuration-syslog-output? config)) (if (and daemonic? (lsh-configuration-syslog-output? config))