diff options
| -rw-r--r-- | gnu-system.am | 1 | ||||
| -rw-r--r-- | gnu/packages/dico.scm | 77 |
2 files changed, 78 insertions, 0 deletions
diff --git a/gnu-system.am b/gnu-system.am index 61dfced1be..3f83b8bd7e 100644 --- a/gnu-system.am +++ b/gnu-system.am @@ -83,6 +83,7 @@ GNU_SYSTEM_MODULES = \ gnu/packages/dc.scm \ gnu/packages/debug.scm \ gnu/packages/dejagnu.scm \ + gnu/packages/dico.scm \ gnu/packages/dictionaries.scm \ gnu/packages/disk.scm \ gnu/packages/djvu.scm \ diff --git a/gnu/packages/dico.scm b/gnu/packages/dico.scm new file mode 100644 index 0000000000..372c090c6f --- /dev/null +++ b/gnu/packages/dico.scm @@ -0,0 +1,77 @@ +;;; GNU Guix --- Functional package management for GNU +;;; Copyright © 2015 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 packages dico) + #:use-module (guix packages) + #:use-module ((guix licenses) #:select (gpl3+)) + #:use-module (guix download) + #:use-module (guix build-system gnu) + #:use-module (gnu packages) + #:use-module (gnu packages readline) + #:use-module (gnu packages m4) + #:use-module (gnu packages guile) + #:use-module (gnu packages python) + #:use-module (gnu packages pcre) + #:use-module (gnu packages gsasl) + #:use-module (gnu packages autotools) + #:use-module (gnu packages compression) + #:use-module (gnu packages wordnet)) + +(define-public dico + (package + (name "dico") + (version "2.2") + (source (origin + (method url-fetch) + (uri (string-append "mirror://gnu/dico/dico-" + version ".tar.xz")) + (sha256 + (base32 + "04pjks075x20d19l623mj50bw64g8i41s63z4kzzqcbg9qg96x64")) + (patches (list (search-patch "cpio-gets-undeclared.patch"))))) + (build-system gnu-build-system) + (arguments + '(#:configure-flags (list (string-append "--with-guile-site-dir=" %output + "/share/guile/site/2.0")) + #:phases (modify-phases %standard-phases + (add-before 'check 'silence-guile + (lambda _ + ;; Guile is too talkative, which disturbs the test + ;; infrastructure. Gag it. + (setenv "GUILE_AUTO_COMPILE" "0") + (setenv "GUILE_WARN_DEPRECATED" "no") + #t))))) + (inputs + `(("m4" ,m4) ;used at run time + ("pcre" ,pcre) + ;; ("python" ,python-2) + ("guile" ,guile-2.0) + ("gsasl" ,gsasl) + ("readline" ,readline-6.2) + ("zlib" ,zlib) + ;; ("wordnet" ,wordnet) ;FIXME: link failure + ("libltdl" ,libltdl))) + (home-page "http://www.gnu.org/software/dico/") + (synopsis "Implementation of DICT server (RFC 2229)") + (description + "GNU Dico implements a flexible dictionary server and client according to +RFC 2229 (DICT Server). It is able to access any database available, +regardless of format, thanks to its modular structure. New modules may be +written in C, Guile or Python. Dico also includes a command-line client, +which may be used to query remote dictionary databases.") + (license gpl3+))) |