;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2023 Ludovic Courtès <ludo@gnu.org>
;;;
;;; 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 home services dict)
  #:use-module (gnu home services)
  #:use-module (gnu services)
  #:use-module (gnu services dict)
  #:use-module ((gnu system shadow) #:select (account-service-type))
  ;; For the 'home-shepherd-service-type' mapping.
  #:use-module (gnu home services shepherd)
  #:export (home-dicod-service-type)
  #:re-export (dicod-configuration))

(define home-dicod-service-type
  (service-type
   (inherit (system->home-service-type
             (remove-service-extensions dicod-service-type
                                        (list account-service-type))))
   (default-value (for-home (dicod-configuration)))))
cpan.scm?id=34432d5a7808a3e9979e7c32dffb938dd27e79a5'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/tests/cpan.scm'>
<input type='hidden' name='id' value='34432d5a7808a3e9979e7c32dffb938dd27e79a5'/><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=34432d5a7808a3e9979e7c32dffb938dd27e79a5'>root</a>/<a href='/guix/log/tests?id=34432d5a7808a3e9979e7c32dffb938dd27e79a5'>tests</a>/<a href='/guix/log/tests/cpan.scm?id=34432d5a7808a3e9979e7c32dffb938dd27e79a5'>cpan.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/tests/cpan.scm?id=34432d5a7808a3e9979e7c32dffb938dd27e79a5&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2020-01-15 18:40:43 +0100'>2020-01-15</span></td><td><a href='/guix/commit/tests/cpan.scm?id=4aea90b1876179aab8d603a42533a6bdf97ccd3c'>import: cpan: Rewrite tests to use an HTTP server instead of mocking.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-01-15 18:40:43 +0100'>2020-01-15</span></td><td><a href='/guix/commit/tests/cpan.scm?id=69f132554c6bd23df4610a21e636bde5f0578174'>import: cpan: Rewrite to use 'define-json-mapping'.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2019-08-22 14:24:11 -0400'>2019-08-22</span></td><td><a href='/guix/commit/tests/cpan.scm?id=d020821c0bd2206a5f3d4db155f2a9a3de7dc670'>Revert "import: cpan: Adapt for the change to guile-json version 3."</a><span class='msg-avail'>...</span></td><td>Mark H Weaver</td></tr>
<tr><td><span title='2019-08-21 18:29:30 +0100'>2019-08-21</span></td><td><a href='/guix/commit/tests/cpan.scm?id=01ce7af25add55514f737af48ea6c127bedfde67'>import: cpan: Adapt for the change to guile-json version 3.</a><span class='msg-avail'>...</span></td><td>Christopher Baines</td></tr>
<tr><td><span title='2018-09-04 17:25:11 +0200'>2018-09-04</span></td><td><a href='/guix/commit/tests/cpan.scm?id=ca719424455465fca4b872c371daf2a46de88b33'>Switch to Guile-Gcrypt.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2018-08-24 18:04:07 +0200'>2018-08-24</span></td><td><a href='/guix/commit/tests/cpan.scm?id=dccd29d17dc6ca6a4f2820ce5f5d4d81f4768e4a'>import: cpan: Adjust test to new URL.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2017-10-30 17:20:42 +0100'>2017-10-30</span></td><td><a href='/guix/commit/tests/cpan.scm?id=b5c7574b2f6fe7752b02eaaa8a745a35b3beb2a1'>Revert "import: cpan: Use HTTPS for home pages."</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2017-10-29 17:32:35 +0100'>2017-10-29</span></td><td><a href='/guix/commit/tests/cpan.scm?id=29f7bf59d5d4d4b848eaedc6766bb4e02cae20d3'>import: cpan: Use HTTPS for home pages.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2017-10-28 18:20:59 -0500'>2017-10-28</span></td><td><a href='/guix/commit/tests/cpan.scm?id=e4bc1727302b0e1e255ea5cf4e2ccf33cafe7296'>import: cpan: Add trailing "/" on home-page.</a><span class='msg-avail'>...</span></td><td>Eric Bavier</td></tr>
<tr><td><span title='2017-10-28 18:20:58 -0500'>2017-10-28</span></td><td><a href='/guix/commit/tests/cpan.scm?id=23055424f2628470a864106dbc4d4acb003399ee'>import: cpan: Propagate imported dependencies.</a><span class='msg-avail'>...</span></td><td>Eric Bavier</td></tr>
<tr><td><span title='2017-09-14 00:10:13 +0200'>2017-09-14</span></td><td><a href='/guix/commit/tests/cpan.scm?id=79e5e00f4f0b5a6b2cbf13f60bcd1fd7029f8e08'>import: cpan: Adjust expected license in tests.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2017-06-07 15:06:34 +0200'>2017-06-07</span></td><td><a href='/guix/commit/tests/cpan.scm?id=4679dd6967c21e21c740cd88e17191b8e2aac5ee'>import: cpan: Update CPAN importer to use MetaCPAN v1 API.</a><span class='msg-avail'>...</span></td><td>James Richardson</td></tr>
<tr><td><span title='2017-02-13 16:04:09 +0100'>2017-02-13</span></td><td><a href='/guix/commit/tests/cpan.scm?id=ce8963c5b7a728257920aeceeb89e40d166d09f4'>tests: Adjust for 'http-fetch' change in (guix import json).</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>