01/12: gnu: Add discount.

[Christopher Baines]

cbaines pushed a commit to branch master
in repository guix.

commit 31d3a7c729068681a3a05036a3fe993213635fc6
Author: Christopher Baines <address@hidden>
Date:   Tue Jun 6 07:12:20 2017 +0100

    gnu: Add discount.
    
    This is required by perl-text-markdown-discount, which is required by 
ikiwiki.
    
    * gnu/packages/markdown.scm (discount) New variable.
---
 gnu/packages/markup.scm | 42 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 42 insertions(+)

diff --git a/gnu/packages/markup.scm b/gnu/packages/markup.scm
index 121e6cd..e3630fe 100644
--- a/gnu/packages/markup.scm
+++ b/gnu/packages/markup.scm
@@ -102,6 +102,48 @@ convert it to structurally valid XHTML (or HTML).")
     (license (non-copyleft "file://License.text"
                            "See License.text in the distribution."))))
 
+(define-public discount
+  (package
+    (name "discount")
+    (version "2.2.2")
+    (source (origin
+             (method url-fetch)
+             (uri (string-append
+                   "http://www.pell.portland.or.us/~orc/Code/";
+                   name "/" name "-" version ".tar.bz2"))
+             (file-name (string-append name "-" version ".tar.gz"))
+             (sha256
+              (base32
+               "0r4gjyk1ngx47zhb25q0gkjm3bz2m5x8ngrk6rim3y1y3rricygc"))))
+    (build-system gnu-build-system)
+    (arguments
+     `(#:test-target "test"
+       #:make-flags (list
+                     (string-append "LFLAGS=-L. -Wl,-rpath="
+                                    (assoc-ref %outputs "out") "/lib"))
+       #:phases
+       (modify-phases %standard-phases
+         (add-before 'configure 'set-AC_PATH
+           (lambda _
+             ;; The default value is not suitable, so override using an
+             ;; environment variable. This just affects the build, and not the
+             ;; resulting store item.
+             (setenv "AC_PATH" (getenv "PATH"))
+             #t))
+         (replace 'configure
+           (lambda* (#:key inputs outputs #:allow-other-keys)
+             (setenv "CC" "gcc")
+             (zero? (system*
+                     "./configure.sh"
+                     (string-append "--prefix=" (assoc-ref outputs "out"))
+                     "--shared")))))))
+    (synopsis "Markdown processing library, written in C")
+    (description
+     "Discount is a markdown implementation, written in C.  It provides a
address@hidden command, and a library.")
+    (home-page "http://www.pell.portland.or.us/~orc/Code/discount/";)
+    (license bsd-3)))
+
 (define-public cmark
   (package
     (name "cmark")