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

gnu: evince: Set search path for MIME info. 

* gnu/packages/gnome.scm (evince): Add #:phases argument.  Remove "perl"
  and "perl-xml-parser" inputs since they are not directly needed; move
  "intltool" to 'native-inputs'.
This commit is contained in:
Ludovic Courtès 2013-10-17 23:13:20 +02:00
parent 9167f8e6f9
commit 96e424672a
1 changed files with 19 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
gnu/packages/gnome.scm
View File

@ -137,10 +137,8 @@ and keep up to date translations of documentation.")
(version "3.6.1") (version "3.6.1")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append "mirror://gnome/sources/evince/3.6/evince-"
"mirror://gnome/sources/evince/3.6/evince-" version ".tar.xz"))
version
".tar.xz"))
(sha256 (sha256
(base32 (base32
"1da1pij030dh8mb0pr0jnyszgsbjnh8lc17rj5ii52j3kmbv51qv")))) "1da1pij030dh8mb0pr0jnyszgsbjnh8lc17rj5ii52j3kmbv51qv"))))
@ -151,7 +149,19 @@ and keep up to date translations of documentation.")
;; FIXME: Tests fail with: ;; FIXME: Tests fail with:
;; ImportError: No module named gi.repository ;; ImportError: No module named gi.repository
;; Where should that module come from? ;; Where should that module come from?
#:tests? #f )) #:tests? #f
#:phases (alist-cons-after
'install 'set-mime-search-path
(lambda* (#:key inputs outputs #:allow-other-keys)
;; Wrap 'evince' so that it knows where MIME info is.
(let ((out (assoc-ref outputs "out"))
(mime (assoc-ref inputs "shared-mime-info")))
(wrap-program (string-append out "/bin/evince")
`("XDG_DATA_DIRS" ":" prefix
,(list (string-append mime "/share")
(string-append out "/share"))))))
%standard-phases)))
(inputs (inputs
`(("libspectre" ,libspectre) `(("libspectre" ,libspectre)
;; ("djvulibre" ,djvulibre) ;; ("djvulibre" ,djvulibre)
@ -167,15 +177,15 @@ and keep up to date translations of documentation.")
("gtk+" ,gtk+) ("gtk+" ,gtk+)
("glib" ,glib) ("glib" ,glib)
("libxml2" ,libxml2) ("libxml2" ,libxml2)
("perl-xml-parser" ,perl-xml-parser)
("perl" ,perl)
("intltool" ,intltool)
("pkg-config" ,pkg-config) ("pkg-config" ,pkg-config)
("libsm" ,libsm) ("libsm" ,libsm)
("libice" ,libice) ("libice" ,libice)
("shared-mime-info" ,shared-mime-info)
;; For tests. ;; For tests.
("dogtail" ,python2-dogtail))) ("dogtail" ,python2-dogtail)))
(native-inputs
`(("intltool" ,intltool)))
(home-page (home-page
"http://www.gnome.org/projects/evince/") "http://www.gnome.org/projects/evince/")
(synopsis "GNOME's document viewer") (synopsis "GNOME's document viewer")
@ -183,8 +193,7 @@ and keep up to date translations of documentation.")
"Evince is a document viewer for multiple document formats. It "Evince is a document viewer for multiple document formats. It
currently supports PDF, PostScript, DjVu, TIFF and DVI. The goal currently supports PDF, PostScript, DjVu, TIFF and DVI. The goal
of Evince is to replace the multiple document viewers that exist of Evince is to replace the multiple document viewers that exist
on the GNOME Desktop with a single simple application. on the GNOME Desktop with a single simple application.")
")
(license gpl2+))) (license gpl2+)))
(define-public gsettings-desktop-schemas (define-public gsettings-desktop-schemas