diff options
author | Ludovic Courtès <ludo@gnu.org> | 2018-01-13 00:32:55 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2018-01-13 00:32:55 +0100 |
commit | 22c334fa2e9c42fd79eef86f71a704c437ac917e (patch) | |
tree | 22c85b9c816015899750d9c411b940f43b39ec3f /gnu/packages/aspell.scm | |
parent | 0dcf675c56a4649ccef657e78849e91f9f9b4c0a (diff) | |
download | patches-22c334fa2e9c42fd79eef86f71a704c437ac917e.tar patches-22c334fa2e9c42fd79eef86f71a704c437ac917e.tar.gz |
gnu: hunspell-dict-en: Include all the .dic files.
Fixes a regression introduced in
d4d7d70912642be18d93c9ce6470f8650097b5e5 which broke
'hunspell-dict-en' (but not the 'hunspell-dict-en-*' variants.)
* gnu/packages/aspell.scm (aspell-word-list)[install]: Check whether
'LANGUAGE.dic' exist before installing it. If it doesn't exist, install
all of *.dic.
Diffstat (limited to 'gnu/packages/aspell.scm')
-rw-r--r-- | gnu/packages/aspell.scm | 18 |
1 files changed, 14 insertions, 4 deletions
diff --git a/gnu/packages/aspell.scm b/gnu/packages/aspell.scm index ec8fa05feb..e1fe3db755 100644 --- a/gnu/packages/aspell.scm +++ b/gnu/packages/aspell.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2013, 2014, 2015, 2017 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2013, 2014, 2015, 2017, 2018 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2015, 2016 Alex Kost <alezost@gmail.com> ;;; Copyright © 2016 John Darrington <jmd@gnu.org> ;;; Copyright © 2016, 2017 Efraim Flashner <efraim@flashner.co.il> @@ -268,10 +268,20 @@ dictionaries, including personal ones.") (hunspell (string-append out "/share/hunspell")) (myspell (string-append out "/share/myspell")) (doc (string-append out "/share/doc/" - ,name))) + ,name)) + (dot-dic ,(string-append "speller/" language ".dic"))) (mkdir-p myspell) - (install-file ,(string-append "speller/" language ".dic") - hunspell) + + ;; Usually there's only a 'LANGUAGE.dic' file, but for the "en" + ;; dictionary, there no 'en.dic'. Instead, there's a set of + ;; 'en*.dic' files, hence the 'find-files' call below. + (if (file-exists? dot-dic) + (install-file dot-dic hunspell) + (for-each (lambda (dic) + (install-file dic hunspell)) + (find-files "speller" + ,(string-append language ".*\\.dic$")))) + (install-file ,(string-append "speller/" language ".aff") hunspell) (symlink hunspell (string-append myspell "/dicts")) |