29/44: gnu: Add texlive-fonts-stmaryrd.

[Ricardo Wurmus]

rekado pushed a commit to branch master
in repository guix.

commit d8fef6ea1fb5559bf1773dc37526a0c94a31cae2
Author: Ricardo Wurmus <address@hidden>
Date:   Sun Jul 2 15:17:41 2017 +0200

    gnu: Add texlive-fonts-stmaryrd.
    
    * gnu/packages/tex.scm (texlive-fonts-stmaryrd): New variable.
---
 gnu/packages/tex.scm | 32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)

diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index 4b7caff..5ac55b9 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -2064,6 +2064,38 @@ package supports pdfTeX (pdfLaTeX) and VTeX.  With VTeX 
it is even possible to
 use this package to insert PostScript files, in addition to PDF files.")
     (license license:lppl1.3+)))
 
+(define-public texlive-fonts-stmaryrd
+  (package
+    (name "texlive-fonts-stmaryrd")
+    (version (number->string %texlive-revision))
+    (source (origin
+              (method svn-fetch)
+              (uri (texlive-ref "fonts" "stmaryrd"))
+              (sha256
+               (base32
+                "08pn4ca3vl6qm9l3wm5h5iyjsrg411kkm1yana329xwg2j14s9n6"))))
+    (build-system texlive-build-system)
+    (arguments
+     '(#:tex-directory "latex/stmaryrd"
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'configure 'patch-ins
+           (lambda _
+             (substitute* "stmaryrd.ins"
+               (("^%% LaTeX2e.*") "\\input docstrip\n")
+               (("fontdef\\}\\}" line)
+                (string-append line "\n\\endbatchfile")))
+             #t)))))
+    (home-page "http://www.ctan.org/pkg/stmaryrd";)
+    (synopsis "St Mary Road symbols for theoretical computer science")
+    (description
+     "The fonts were originally distributed as Metafont sources only, but
+Adobe Type 1 versions are also now available.  Macro support is provided for
+use under LaTeX; the package supports the @code{only} option (provided by the
address@hidden package) to restrict what is loaded, for those who don't need
+the whole font.")
+    (license license:lppl)))
+
 (define texlive-texmf
   (package
    (name "texlive-texmf")