me
/
guix
Archived
1
0
Fork 0
Code

services: dict: Deprecate 'dicod-service' procedure. 

* doc/guix.texi (Miscellaneous Services): Remove 'dicod-service' mention.
* gnu/services/dict.scm (dicod-service): Deprecate procedure.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
master
Bruno Victal 2023-03-05 00:48:23 +00:00 committed by Ludovic Courtès
parent 511ae8325d
commit 20aa4c30fb
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
2 changed files with 22 additions and 26 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
doc/guix.texi
View File

@ -37850,25 +37850,17 @@ If true, this must be the name of a file to log messages to.
@subsubheading Dictionary Service @subsubheading Dictionary Service
@cindex dictionary @cindex dictionary
The @code{(gnu services dict)} module provides the following service: The @code{(gnu services dict)} module provides the following service:
@defvar dicod-service-type @defvar dicod-service-type
This is the type of the service that runs the @command{dicod} daemon, an This is the type of the service that runs the @command{dicod} daemon, an
implementation of DICT server (@pxref{Dicod,,, dico, GNU Dico Manual}). implementation of DICT server (@pxref{Dicod,,, dico, GNU Dico Manual}).
@end defvar
@deffn {Scheme Procedure} dicod-service [#:config (dicod-configuration)]
Return a service that runs the @command{dicod} daemon, an implementation
of DICT server (@pxref{Dicod,,, dico, GNU Dico Manual}).
The optional @var{config} argument specifies the configuration for
@command{dicod}, which should be a @code{<dicod-configuration>} object, by
default it serves the GNU Collaborative International Dictionary of English.
You can add @command{open localhost} to your @file{~/.dico} file to make You can add @command{open localhost} to your @file{~/.dico} file to make
@code{localhost} the default server for @command{dico} client @code{localhost} the default server for @command{dico} client
(@pxref{Initialization File,,, dico, GNU Dico Manual}). (@pxref{Initialization File,,, dico, GNU Dico Manual}).
@end deffn @end defvar
@deftp {Data Type} dicod-configuration @deftp {Data Type} dicod-configuration
Data type representing the configuration of dicod. Data type representing the configuration of dicod.
@ -37933,17 +37925,19 @@ A @code{<dicod-database>} object serving the GNU Collaborative International
Dictionary of English using the @code{gcide} package. Dictionary of English using the @code{gcide} package.
@end defvar @end defvar
The following is an example @code{dicod-service} configuration. The following is an example @code{dicod-service-type} configuration.
@lisp @lisp
(dicod-service #:config (service dicod-service-type
(dicod-configuration (dicod-configuration
(handlers (list (dicod-handler (handlers (list
(dicod-handler
(name "wordnet") (name "wordnet")
(module "dictorg") (module "dictorg")
(options (options
(list #~(string-append "dbdir=" #$wordnet)))))) (list #~(string-append "dbdir=" #$wordnet))))))
(databases (list (dicod-database (databases (list
(dicod-database
(name "wordnet") (name "wordnet")
(complex? #t) (complex? #t)
(handler "wordnet") (handler "wordnet")

6
gnu/services/dict.scm
View File

@ -19,6 +19,7 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>. ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (gnu services dict) (define-module (gnu services dict)
#:use-module (guix deprecation)
#:use-module (guix gexp) #:use-module (guix gexp)
#:use-module (guix records) #:use-module (guix records)
#:use-module (guix modules) #:use-module (guix modules)
@ -34,7 +35,7 @@
#:use-module (srfi srfi-1) #:use-module (srfi srfi-1)
#:use-module (srfi srfi-26) #:use-module (srfi srfi-26)
#:use-module (ice-9 match) #:use-module (ice-9 match)
#:export (dicod-service #:export (dicod-service ; deprecated
dicod-service-type dicod-service-type
dicod-configuration dicod-configuration
dicod-handler dicod-handler
@ -202,7 +203,8 @@ database {
implements the standard DICT protocol supported by clients such as implements the standard DICT protocol supported by clients such as
@command{dico} and GNOME Dictionary."))) @command{dico} and GNOME Dictionary.")))
(define* (dicod-service #:key (config (dicod-configuration))) (define-deprecated (dicod-service #:key (config (dicod-configuration)))
dicod-service-type
"Return a service that runs the @command{dicod} daemon, an implementation "Return a service that runs the @command{dicod} daemon, an implementation
of DICT server (@pxref{Dicod,,, dico, GNU Dico Manual}). of DICT server (@pxref{Dicod,,, dico, GNU Dico Manual}).