;;; bandali's personal site, using haunt-next (git)
;;; Copyright © 2019 Amin Bandali <bandali@gnu.org>
;;;
;;; This program is free software: you can redistribute it and/or modify
;;; it under the terms of the GNU General Public License as published by
;;; the Free Software Foundation, either version 3 of the License, or
;;; (at your option) any later version.
;;;
;;; This program is distributed in the hope that it will be useful,
;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with this program.  If not, see <http://www.gnu.org/licenses/>.

;; To set up a hacking environment:
;;     guix environment -l guix.scm

(use-modules (guix packages)
             (guix licenses)
             (guix git-download)
             (guix build-system gnu)
             (guix utils)               ; substitute-keyword-arguments
             (gnu packages autotools)
             (gnu packages base)        ; glibc-locales
             (gnu packages guile)
             (gnu packages guile-xyz))

(define haunt-next
  (package
   (inherit haunt)
   (source
    (origin
     (method git-fetch)
     (uri (git-reference
           (url "https://git.dthompson.us/haunt.git")
           (commit "65adbb052f7d27c382b7f9f3c665635aeab96a02")))
     (sha256
      (base32
       "19vybz0hczjxj3npznnams5740vqi1gsdsyjiqpy241f783f4i83"))))
   (arguments
    (substitute-keyword-arguments (package-arguments haunt)
      ((#:phases phases)
       `(modify-phases ,phases
          (add-before 'configure 'bootstrap
            (lambda _
              (zero? (system* "./bootstrap"))))))))
   (native-inputs
    `(("autoconf" ,autoconf)            ; autoreconf
      ("automake" ,automake)            ; aclocal
      ,@(package-native-inputs haunt)))
   (propagated-inputs
    `(("glibc-locales" ,glibc-locales)  ; setlocale-related runtime error
      ,@(package-propagated-inputs haunt)))))

(package
 (name "bandali-site")
 (version "git")
 (source #f)
 (build-system gnu-build-system)
 (synopsis #f)
 (description #f)
 (license gpl3+)
 (home-page "https://bandali.eu.org")
 (inputs
  `(("guile" ,guile-2.2)))
 (native-inputs
  `(("haunt" ,haunt-next)
    ("guile-reader" ,guile-reader)
    ("guile-sjson" ,guile-sjson)
    ("guile-commonmark" ,guile-commonmark)
    ("guile-syntax-highlight" ,guile-syntax-highlight))))