nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gnu: aspell-dictionary: Use ‘modify-phases’ syntax. 

* gnu/packages/aspell.scm (aspell-dictionary)[arguments]: Use
‘modify-phases’.
This commit is contained in:
Tobias Geerinckx-Rice 2016-12-19 21:26:39 +01:00
parent f87b8e25c3
commit 707ee32471
No known key found for this signature in database
GPG Key ID: 91CCDB9B48541B99
1 changed files with 13 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
gnu/packages/aspell.scm
View File

@ -66,7 +66,8 @@ dictionaries, including personal ones.")
;;; ;;;
;;; Dictionaries. ;;; Dictionaries.
;;; ;;;
;;; Use 'export ASPELL_CONF="dict-dir $HOME/.guix-profile/lib/aspell"' to use them. ;;; Use 'export ASPELL_CONF="dict-dir $HOME/.guix-profile/lib/aspell"' to use
;;; them.
;;; ;;;
(define* (aspell-dictionary dict-name full-name (define* (aspell-dictionary dict-name full-name
@ -82,16 +83,17 @@ dictionaries, including personal ones.")
(sha256 sha256))) (sha256 sha256)))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:phases (alist-replace `(#:phases
'configure (modify-phases %standard-phases
(lambda* (#:key outputs #:allow-other-keys) (replace 'configure
(let ((out (assoc-ref outputs "out"))) (lambda* (#:key outputs #:allow-other-keys)
(zero? (system* "./configure")))) (let ((out (assoc-ref outputs "out")))
%standard-phases) (zero? (system* "./configure"))))))
#:make-flags (let ((out (assoc-ref %outputs "out"))) #:make-flags
(list (string-append "dictdir=" out "/lib/aspell") (let ((out (assoc-ref %outputs "out")))
(string-append "datadir=" out "/lib/aspell"))) (list (string-append "dictdir=" out "/lib/aspell")
#:tests? #f)) (string-append "datadir=" out "/lib/aspell")))
#:tests? #f))
(native-inputs `(("aspell" ,aspell) (native-inputs `(("aspell" ,aspell)
("which" ,which))) ("which" ,which)))
(synopsis (string-append full-name " dictionary for GNU Aspell")) ; XXX: i18n (synopsis (string-append full-name " dictionary for GNU Aspell")) ; XXX: i18n