gitile/guix.scm

guix.scm

1
;;;; Copyright (C) 2020, 2021 Julien Lepiller <julien@lepiller.eu>
2
;;;;
3
;;;; SPDX-License-Identifier: AGPL-3.0-or-later
4
;;;;
5
;;;; This program is free software: you can redistribute it and/or modify
6
;;;; it under the terms of the GNU Affero General Public License as published by
7
;;;; the Free Software Foundation, either version 3 of the License, or
8
;;;; (at your option) any later version.
9
;;;;
10
;;;; This program is distributed in the hope that it will be useful,
11
;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
12
;;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13
;;;; GNU Affero General Public License for more details.
14
;;;;
15
;;;; You should have received a copy of the GNU Affero General Public License
16
;;;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
17
;;;;
18
19
(use-modules (guix packages)
20
             (guix licenses)
21
             (guix build-system gnu)
22
             (guix git-download)
23
             (gnu packages autotools)
24
             (gnu packages gnupg)
25
             (gnu packages guile)
26
             (gnu packages guile-xyz)
27
             (gnu packages pkg-config)
28
             (gnu packages texinfo)
29
             (gnu packages tls))
30
31
(define my-guile-syntax-highlight
32
  (package
33
    (inherit guile-syntax-highlight)
34
    (source (origin
35
              (method git-fetch)
36
              (uri (git-reference
37
                     (url "https://git.dthompson.us/guile-syntax-highlight.git")
38
                     (commit "51727cbb7fc05ef743aab2d7b16314ea1ed790e4")))
39
              (file-name (git-file-name "guile-syntax-highlight" "0.1.51727cb"))
40
              (sha256
41
               (base32
42
                "1cvacy4y5qxajygb1qg8hvhjdf2xnnwnm5j918cabsi8wfwchig7"))))
43
    (native-inputs
44
     `(("autoconf" ,autoconf)
45
       ("automake" ,automake)
46
       ("texinfo" ,texinfo)
47
       ,@(package-native-inputs guile-syntax-highlight)))))
48
49
(package
50
  (name "gitile")
51
  (version "0.1")
52
  (source #f)
53
  (build-system gnu-build-system)
54
  (propagated-inputs
55
   `(("guile-commonmark" ,guile-commonmark)
56
     ("guile-git" ,guile-git)
57
     ("guile-gcrypt" ,guile-gcrypt)
58
     ("guile-syntax-highlight" ,my-guile-syntax-highlight)
59
     ("gnutls" ,gnutls)
60
     ("guile-fibers" ,guile-fibers)))
61
  (native-inputs
62
   `(("autoconf" ,autoconf)
63
     ("automake" ,automake)
64
     ("libtool" ,libtool)
65
     ("pkg-config" ,pkg-config)
66
     ("guile" ,guile-3.0)))
67
  (home-page "https://git.lepiller.eu")
68
  (synopsis "")
69
  (description "")
70
  (license gpl3+))
71