gnu: ding: Use INVOKE.

* gnu/packages/dictionaries.scm (ding)[arguments]: Use INVOKE.
This commit is contained in:
Ricardo Wurmus 2019-01-26 14:47:48 +01:00
parent c9e7515970
commit 7f46dcc49c
No known key found for this signature in database
GPG Key ID: 197A5888235FACAC
1 changed files with 2 additions and 4 deletions

View File

@ -176,8 +176,7 @@ work, such as sentence length and other readability measures.")
(delete 'configure) (delete 'configure)
(delete 'build) (delete 'build)
(delete 'check) (delete 'check)
(replace (replace 'install
'install
(lambda _ (lambda _
(let ((bindir (string-append (let ((bindir (string-append
(assoc-ref %outputs "out") "/bin")) (assoc-ref %outputs "out") "/bin"))
@ -209,8 +208,7 @@ work, such as sentence length and other readability measures.")
(string-append "DEFLIBDIR=\"" libdir "\""))) (string-append "DEFLIBDIR=\"" libdir "\"")))
(install-file "ding.desktop" sharedir) (install-file "ding.desktop" sharedir)
(install-file "ding.png" sharedir) (install-file "ding.png" sharedir)
(zero? (invoke "./install.sh")))))))
(system* "./install.sh"))))))))
(synopsis "Dictionary lookup program with a German-English dictionary") (synopsis "Dictionary lookup program with a German-English dictionary")
(description "Ding is a dictionary lookup program for the X window system. (description "Ding is a dictionary lookup program for the X window system.
It comes with a German-English dictionary with approximately 270,000 entries.") It comes with a German-English dictionary with approximately 270,000 entries.")