ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-26 06:18:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: emacs-djvu: Add needed inputs

Browse source 
* gnu/packages/emacs-xyz.scm (emacs-djvu)[inputs, arguments]: New fields.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Morgan Smith 2020-09-08 22:21:11 -04:00 committed by Ludovic Courtès
parent 11a962e653
commit 227932991f
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 21 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

24
gnu/packages/emacs-xyz.scm
View file

@ -118,6 +118,7 @@ (define-module (gnu packages emacs-xyz)
#:use-module (gnu packages curl) #:use-module (gnu packages curl)
#:use-module (gnu packages databases) #:use-module (gnu packages databases)
#:use-module (gnu packages dictionaries) #:use-module (gnu packages dictionaries)
#:use-module (gnu packages djvu)
#:use-module (gnu packages emacs) #:use-module (gnu packages emacs)
#:use-module (gnu packages guile) #:use-module (gnu packages guile)
#:use-module (gnu packages gtk) #:use-module (gnu packages gtk)
@ -2479,13 +2480,30 @@ (define-public emacs-djvu
(sha256 (sha256
(base32 "0njgyx09q225hliacsnjk8wallg5i6xkz6bj501pb05nwqfbvfk7")))) (base32 "0njgyx09q225hliacsnjk8wallg5i6xkz6bj501pb05nwqfbvfk7"))))
(build-system emacs-build-system) (build-system emacs-build-system)
(inputs `(("djview" ,djview)
("djvulibre" ,djvulibre)))
(arguments
`(#:phases
(modify-phases %standard-phases
(add-after 'unpack 'configure
(lambda* (#:key inputs outputs #:allow-other-keys)
(let ((file "djvu.el")
(djview (assoc-ref inputs "djview"))
(djvulibre (assoc-ref inputs "djvulibre")))
;; Specify the absolute executable locations.
(chmod file #o644)
(substitute* file
(("\"djvused\"") (string-append "\"" djvulibre "/bin/djvused\""))
(("\"djvm\"") (string-append "\"" djvulibre "/bin/djvm\""))
(("\"ddjvu\"") (string-append "\"" djvulibre "/bin/ddjvu\"")))
(emacs-substitute-variables file
("djvu-djview-command" (string-append djview "/bin/djview"))))
#t)))))
(home-page "http://elpa.gnu.org/packages/djvu.html") (home-page "http://elpa.gnu.org/packages/djvu.html")
(synopsis "Edit and view Djvu files via djvused") (synopsis "Edit and view Djvu files via djvused")
(description (description
"This package is a front end for the command-line program djvused from "This package is a front end for the command-line program djvused from
DjVuLibre, see @url{http://djvu.sourceforge.net/}. It assumes you have the DjVuLibre, see @url{http://djvu.sourceforge.net/}.")
programs @command{djvused}, @command{djview}, @command{ddjvu}, and
@command{djvm} installed.")
(license license:gpl3+))) (license license:gpl3+)))
(define-public emacs-pabbrev (define-public emacs-pabbrev