aboutsummaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2019-07-08 22:43:43 +0200
committerRicardo Wurmus <rekado@elephly.net>2019-07-24 09:46:42 +0200
commit659fda6cc716b8fcdee93012f25514ab8ad514f9 (patch)
tree7a94e6f7371f96f56797b18cf2a4fbe6aa01b91e /gnu
parente68c70917958aa38c35a3cf349cdc80df31d2194 (diff)
downloadguix-659fda6cc716b8fcdee93012f25514ab8ad514f9.tar
guix-659fda6cc716b8fcdee93012f25514ab8ad514f9.tar.gz
gnu: texlive-dvips: Implement with simple-texlive-package.
* gnu/packages/tex.scm (texlive-dvips): Use simple-texlive-package.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/tex.scm66
1 files changed, 10 insertions, 56 deletions
diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index 74d8e04a75..bea661b91e 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -462,64 +462,18 @@ the autogenerated files @file{language.dat} and @file{language.def} (and
default versions of those), etc.")
(license license:knuth)))
+;; TODO: This package should not exist. There should not be a single package
+;; containing all of /dvips. These really belong to different packages.
(define-public texlive-dvips
(package
- (name "texlive-dvips")
- (version (number->string %texlive-revision))
- (source (origin
- (method svn-fetch)
- (uri (svn-reference
- (url (string-append "svn://www.tug.org/texlive/tags/"
- %texlive-tag "/Master/texmf-dist/"
- "/dvips"))
- (revision %texlive-revision)))
- (file-name (string-append name "-" version "-checkout"))
- (sha256
- (base32
- "1ky6wc173jhf0b33lhyb4r3bx1d4bmiqkn6y1hxn92kwjdzl42p7"))))
- (build-system trivial-build-system)
- (arguments
- `(#:modules ((guix build utils))
- #:builder
- (begin
- (use-modules (guix build utils))
- (let* ((root (string-append (assoc-ref %outputs "out")
- "/share/texmf-dist"))
- (dvips (string-append root "/dvips"))
- (maps (string-append root "/fonts/map/dvips"))
- (encs (string-append root "/fonts/enc/dvips/base")))
- (mkdir-p dvips)
- (copy-recursively (assoc-ref %build-inputs "source") dvips)
- (mkdir-p maps)
- (copy-recursively (assoc-ref %build-inputs "dvips-font-maps") maps)
- (mkdir-p encs)
- (copy-recursively (assoc-ref %build-inputs "dvips-base-enc") encs)
- #t))))
- (native-inputs
- `(("dvips-font-maps"
- ,(origin
- (method svn-fetch)
- (uri (svn-reference
- (url (string-append "svn://www.tug.org/texlive/tags/"
- %texlive-tag "/Master/texmf-dist/"
- "/fonts/map/dvips"))
- (revision %texlive-revision)))
- (file-name (string-append "dvips-font-maps-" version "-checkout"))
- (sha256
- (base32
- "0nxvfbb5vsvakiw0iviicghdc2sxk05cj056ilqnpa62fffc36a6"))))
- ("dvips-base-enc"
- ,(origin
- (method svn-fetch)
- (uri (svn-reference
- (url (string-append "svn://www.tug.org/texlive/tags/"
- %texlive-tag "/Master/texmf-dist/"
- "/fonts/enc/dvips/base"))
- (revision %texlive-revision)))
- (file-name (string-append "dvips-base-enc-" version "-checkout"))
- (sha256
- (base32
- "1xnf6ms0h87r55kxik4vicwr1907scj789lhqflqns8svvsli5iy"))))))
+ (inherit (simple-texlive-package
+ "texlive-dvips"
+ (list "/fonts/map/dvips/"
+ "/fonts/enc/dvips/base/"
+ "/dvips/")
+ (base32
+ "1di07wx8wjczddmagq5z082l2has3inzk5jwkqh4i6wv1qdfqpp6")
+ #:trivial? #t))
(home-page "https://www.ctan.org/pkg/dvips")
(synopsis "DVI to PostScript drivers")
(description "This package provides files needed for converting DVI files