;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2020 Mathieu Othacehe <m.othacehe@gmail.com>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.

(define-module (gnu installer substitutes)
  #:use-module (gnu installer utils)
  #:use-module (gnu services herd)
  #:export (enable-discovery
            disable-discovery))

(define (enable-discovery)
  (with-silent-shepherd
    (with-shepherd-action 'guix-daemon
        ('discover "on")
        result
      result)))

(define (disable-discovery)
  (with-silent-shepherd
    (with-shepherd-action 'guix-daemon
        ('discover "off")
        result
      result)))

;; Local Variables:
;; eval: (put 'with-silent-shepherd 'scheme-indent-function 0)
;; End:
9834c36724b6ba1276e78145dd74145549f25b67'>commit</a><a href='/guix/diff/gnu/services.scm?id=9834c36724b6ba1276e78145dd74145549f25b67'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/services.scm'>
<input type='hidden' name='id' value='9834c36724b6ba1276e78145dd74145549f25b67'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=9834c36724b6ba1276e78145dd74145549f25b67'>root</a>/<a href='/guix/log/gnu?id=9834c36724b6ba1276e78145dd74145549f25b67'>gnu</a>/<a href='/guix/log/gnu/services.scm?id=9834c36724b6ba1276e78145dd74145549f25b67'>services.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/services.scm?id=9834c36724b6ba1276e78145dd74145549f25b67&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2020-06-08 14:26:14 +0200'>2020-06-08</span></td><td><a href='/guix/commit/gnu/services.scm?id=68d8c094659565fe19abc1c433a17337ce5cacb7'>gnu: services: Add %hurd-startup-service.</a><span class='msg-avail'>...<span class='msg-tooltip'>This decouples startup of the Hurd from the "hurd" package, moving the RC
script into SYSTEM.

* gnu/packages/hurd.scm (hurd)[inputs]: Remove hurd-rc-script.
[arguments]: Do not substitute it.  Update "runsystem.sh" to parse kernel
arguments and exec into --system=SYSTEM/rc.
(hurd-rc-script): Move to...
* gnu/services.scm (%hurd-rc-file): ...this new variable.
(hurd-rc-entry): New procedure.
(%hurd-startup-service): Use it in new variable.
* gnu/system.scm (hurd-default-essential-services): Use it.
</span></span></td><td>Jan (janneke) Nieuwenhuizen</td></tr>
<tr><td><span title='2020-06-08 13:51:19 +0200'>2020-06-08</span></td><td><a href='/guix/commit/gnu/services.scm?id=59bcffa314171294278444aad4b7012abe50257a'>system: examples: Add bare-hurd.tmpl.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/system/hurd.scm (%hurd-def%hurd-default-operating-system-kernel,
%hurd-default-operating-system): New exported variables.
* gnu/system/examples/bare-hurd.tmpl: New file.
* Makefile.am (EXAMPLES): Add it.
* tests/guix-system.sh: Add --target=i586-pc-gnu when testing it.
</span></span></td><td>Jan (janneke) Nieuwenhuizen</td></tr>
<tr><td><span title='2020-04-26 22:49:49 +0200'>2020-04-26</span></td><td><a href='/guix/commit/gnu/services.scm?id=0e5c2d5e145118ec47329d6b3a534344d2e89cd3'>services: system: Initial entries are non-monadic.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/system.scm (operating-system-directory-base-entries): Return a
regular, non-monadic value.
* gnu/services.scm (system-derivation): Adjust accordingly.
* gnu/system/linux-container.scm (container-essential-services): Likewise.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-04-26 22:49:48 +0200'>2020-04-26</span></td><td><a href='/guix/commit/gnu/services.scm?id=45bd91334f6a932ed65576febd6e71888563cd8f'>services: profile: Use a declarative profile.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services.scm (packages-&gt;profile-entry): Use 'profile' instead of
'profile-derivation'.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-04-21 00:06:40 +0200'>2020-04-21</span></td><td><a href='/guix/commit/gnu/services.scm?id=a322e9d16b227484ce04721fee0f99618cb1007e'>services: etc: Detect and report duplicate entries.</a><span class='msg-avail'>...<span class='msg-tooltip'>Fixes &lt;https://bugs.gnu.org/40729&gt;.
Reported by Christopher Baines &lt;mail@cbaines.net&gt;.

* gnu/services.scm (files-&gt;etc-directory)[assert-no-duplicates]: New
procedure.
Use it.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-04-05 12:12:07 +0200'>2020-04-05</span></td><td><a href='/guix/commit/gnu/services.scm?id=8c88e242292db9b35b4ae6ad788a0f8f3c94bb53'>services: Allow modprobe to use "/etc/modprobe.d".</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services.scm (%modprobe-wrapper): Set 'MODPROBE_OPTIONS'
environment variable.

Signed-off-by: Danny Milosavljevic &lt;dannym@scratchpost.org&gt;
</span></span></td><td>Brice Waegeneire</td></tr>
<tr><td><span title='2020-04-02 11:48:24 +0200'>2020-04-02</span></td><td><a href='/guix/commit/gnu/services.scm?id=223ede4e156acf9fa9ae52e81007e3c4356c4cf4'>services: Accumulate builds for 'system' entries.</a><span class='msg-avail'>...<span class='msg-tooltip'>That way, more build requests are accumulated when running "guix system
build".

* gnu/services.scm (system-derivation): Use 'mapm/accumulate-builds'
rather than 'sequence'.
</span></span></td><td>Ludovic Courtès</td></tr>