ssi on;
[~bandali/bndl.org] / guix.scm
1 ;;; bandali's personal site, using haunt-next (git)
2 ;;; Copyright © 2019 Amin Bandali <bandali@gnu.org>
3 ;;;
4 ;;; This program is free software: you can redistribute it and/or modify
5 ;;; it under the terms of the GNU General Public License as published by
6 ;;; the Free Software Foundation, either version 3 of the License, or
7 ;;; (at your option) any later version.
8 ;;;
9 ;;; This program is distributed in the hope that it will be useful,
10 ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
11 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 ;;; GNU General Public License for more details.
13 ;;;
14 ;;; You should have received a copy of the GNU General Public License
15 ;;; along with this program. If not, see <http://www.gnu.org/licenses/>.
16
17 ;; To set up a hacking environment:
18 ;; guix environment -l guix.scm
19
20 (use-modules (guix packages)
21 (guix licenses)
22 (guix git-download)
23 (guix build-system gnu)
24 (guix utils) ; substitute-keyword-arguments
25 (gnu packages autotools)
26 (gnu packages base) ; glibc-locales
27 (gnu packages guile)
28 (gnu packages guile-xyz))
29
30 (define haunt-next
31 (package
32 (inherit haunt)
33 (source
34 (origin
35 (method git-fetch)
36 (uri (git-reference
37 (url "https://git.dthompson.us/haunt.git")
38 (commit "65adbb052f7d27c382b7f9f3c665635aeab96a02")))
39 (sha256
40 (base32
41 "19vybz0hczjxj3npznnams5740vqi1gsdsyjiqpy241f783f4i83"))))
42 (arguments
43 (substitute-keyword-arguments (package-arguments haunt)
44 ((#:phases phases)
45 `(modify-phases ,phases
46 (add-before 'configure 'bootstrap
47 (lambda _
48 (zero? (system* "./bootstrap"))))))))
49 (native-inputs
50 `(("autoconf" ,autoconf) ; autoreconf
51 ("automake" ,automake) ; aclocal
52 ,@(package-native-inputs haunt)))
53 (propagated-inputs
54 `(("glibc-locales" ,glibc-locales) ; setlocale-related runtime error
55 ,@(package-propagated-inputs haunt)))))
56
57 (package
58 (name "bandali-site")
59 (version "git")
60 (source #f)
61 (build-system gnu-build-system)
62 (synopsis #f)
63 (description #f)
64 (license gpl3+)
65 (home-page "https://bandali.eu.org")
66 (inputs
67 `(("guile" ,guile-2.2)))
68 (native-inputs
69 `(("haunt" ,haunt-next)
70 ("guile-reader" ,guile-reader)
71 ("guile-sjson" ,guile-sjson)
72 ("guile-commonmark" ,guile-commonmark)
73 ("guile-syntax-highlight" ,guile-syntax-highlight))))