services: tor: Mark end of auto-generated configuration block.

* gnu/services/networking.scm (tor-configuration->torrc): Clearly
demarcate auto-generated lines.
This commit is contained in:
Tobias Geerinckx-Rice 2018-06-14 04:41:18 +02:00
parent 0b5c16c07f
commit 0975ca3fd4
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79

View file

@ -6,6 +6,7 @@
;;; Copyright © 2017 Clément Lassieur <clement@lassieur.org> ;;; Copyright © 2017 Clément Lassieur <clement@lassieur.org>
;;; Copyright © 2017 Thomas Danckaert <post@thomasdanckaert.be> ;;; Copyright © 2017 Thomas Danckaert <post@thomasdanckaert.be>
;;; Copyright © 2017 Marius Bakke <mbakke@fastmail.com> ;;; Copyright © 2017 Marius Bakke <mbakke@fastmail.com>
;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -608,7 +609,7 @@ (define (tor-configuration->torrc config)
(call-with-output-file #$output (call-with-output-file #$output
(lambda (port) (lambda (port)
(display "\ (display "\
# The beginning was automatically added. ### These lines were generated from your system configuration:
User tor User tor
DataDirectory /var/lib/tor DataDirectory /var/lib/tor
Log notice syslog\n" port) Log notice syslog\n" port)
@ -628,6 +629,9 @@ (define (tor-configuration->torrc config)
(cons name mapping))) (cons name mapping)))
services)) services))
(display "\
### End of automatically generated lines.\n\n" port)
;; Append the user's config file. ;; Append the user's config file.
(call-with-input-file #$config-file (call-with-input-file #$config-file
(lambda (input) (lambda (input)