[PATCH 9/9] gnu: fontforge: Install 'showttf' tool.

[ericbavier@openmailbox.org]

From: Eric Bavier <bavier@member.fsf.org>

* gnu/packages/fontutils.scm (fontforge)[arguments]: Add 'build-contrib'
  phase.
---
 gnu/packages/fontutils.scm | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/gnu/packages/fontutils.scm b/gnu/packages/fontutils.scm
index 5b3247b..f120aef 100644
--- a/gnu/packages/fontutils.scm
+++ b/gnu/packages/fontutils.scm
@@ -562,6 +562,14 @@ definitions.")
                 ;; hard-coded.
                 (("gww_prefix in.*") (string-append "gww_prefix in "
                                                    cairo " " pango "\n"))))))
+        (add-after 'build 'build-contrib
+          (lambda* (#:key outputs #:allow-other-keys)
+            (let* ((out (assoc-ref outputs "out"))
+                   (bin (string-append out "/bin")))
+              (and (zero? (system* "make" "-Ccontrib/fonttools"
+                                   "CC=gcc" "showttf"))
+                   (begin (install-file "contrib/fonttools/showttf" bin)
+                          #t)))))
         (add-after 'install 'set-library-path
           (lambda* (#:key inputs outputs #:allow-other-keys)
             (let ((out (assoc-ref outputs "out"))
-- 
2.7.3