mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
services: bitlbee: Add plugins.
* doc/guix.texi (Bitlbee Service): Add plugins. * gnu/services/messaging.scm (<bitlbee-configuration>): Add plugins argument. (bitlbee-shepherd-service): Update config file. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
parent
b87fc9ab9d
commit
36d619e85d
2 changed files with 12 additions and 4 deletions
|
@ -14985,6 +14985,9 @@ networking interface.
|
|||
@item @code{package} (default: @code{bitlbee})
|
||||
The BitlBee package to use.
|
||||
|
||||
@item @code{plugins} (default: @code{'()})
|
||||
List of plugin packages to use---e.g., @code{bitlbee-discord}.
|
||||
|
||||
@item @code{extra-settings} (default: @code{""})
|
||||
Configuration snippet added as-is to the BitlBee configuration file.
|
||||
@end table
|
||||
|
|
|
@ -2,6 +2,7 @@
|
|||
;;; Copyright © 2017, 2018 Clément Lassieur <clement@lassieur.org>
|
||||
;;; Copyright © 2017 Mathieu Othacehe <m.othacehe@gmail.com>
|
||||
;;; Copyright © 2015, 2017, 2018 Ludovic Courtès <ludo@gnu.org>
|
||||
;;; Copyright © 2018 Pierre-Antoine Rouby <contact@parouby.fr>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
|
@ -790,20 +791,24 @@ (define-record-type* <bitlbee-configuration>
|
|||
(default "127.0.0.1"))
|
||||
(port bitlbee-configuration-port
|
||||
(default 6667))
|
||||
(plugins bitlbee-plugins
|
||||
(default '()))
|
||||
(extra-settings bitlbee-configuration-extra-settings
|
||||
(default "")))
|
||||
|
||||
(define bitlbee-shepherd-service
|
||||
(match-lambda
|
||||
(($ <bitlbee-configuration> bitlbee interface port extra-settings)
|
||||
(let ((conf (plain-file "bitlbee.conf"
|
||||
(string-append "
|
||||
(($ <bitlbee-configuration> bitlbee interface port
|
||||
plugins extra-settings)
|
||||
(let ((conf (mixed-text-file "bitlbee.conf"
|
||||
"
|
||||
[settings]
|
||||
User = bitlbee
|
||||
ConfigDir = /var/lib/bitlbee
|
||||
DaemonInterface = " interface "
|
||||
DaemonPort = " (number->string port) "
|
||||
" extra-settings))))
|
||||
PluginDir = " (directory-union "bitlbee-plugins" plugins) "/lib/bitlbee
|
||||
" extra-settings)))
|
||||
|
||||
(with-imported-modules (source-module-closure
|
||||
'((gnu build shepherd)
|
||||
|
|
Loading…
Reference in a new issue