guile-fediverse/guix.scm

guix.scm

1
;;;; Copyright (C) 2020 Julien Lepiller <julien@lepiller.eu>
2
;;;; 
3
;;;; This library is free software; you can redistribute it and/or
4
;;;; modify it under the terms of the GNU Lesser General Public
5
;;;; License as published by the Free Software Foundation; either
6
;;;; version 3 of the License, or (at your option) any later version.
7
;;;; 
8
;;;; This library is distributed in the hope that it will be useful,
9
;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
10
;;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11
;;;; Lesser General Public License for more details.
12
;;;; 
13
;;;; You should have received a copy of the GNU Lesser General Public
14
;;;; License along with this library; if not, write to the Free Software
15
;;;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
16
;;;; 
17
18
(use-modules
19
  ((guix licenses) #:prefix license:)
20
  (guix build-system gnu)
21
  (guix download)
22
  (guix git-download)
23
  (guix packages)
24
  (guix utils)
25
  (gnu packages autotools)
26
  (gnu packages gnupg)
27
  (gnu packages guile)
28
  (gnu packages guile-xyz)
29
  (gnu packages pkg-config)
30
  (gnu packages texinfo)
31
  (gnu packages tls))
32
33
(define my-guile-json
34
  (package
35
    (inherit guile-json-4)
36
    (source (origin
37
              (method git-fetch)
38
              (uri (git-reference
39
                     (url "https://github.com/aconchillo/guile-json")
40
                     (commit "2e9512b43e31bb697efd359509e986321a903f69")))
41
              (file-name (git-file-name "guile-json"
42
                                        (string-append
43
                                          (package-version guile-json-4)
44
                                          "-2e9512b")))
45
              (sha256
46
               (base32
47
                "1al7pa9726fsj4hki0zqzgknn3v2kn3d01wp6fmkdc3cwpyamanc"))))
48
    (native-inputs
49
     `(("autoconf" ,autoconf)
50
       ("automake" ,automake)
51
       ("pkg-config" ,pkg-config)
52
       ,@(package-native-inputs guile-json-4)))))
53
54
(package
55
  (name "guile-fediverse")
56
  (version "0.1.0")
57
  (source
58
    (origin
59
      (method git-fetch)
60
      (uri (git-reference
61
             (url "https://framagit.org/tyreunom/guile-fediverse")
62
             (commit version)))
63
      (file-name (git-file-name name version))
64
      (sha256
65
       (base32
66
        "00l03j8ajkd1a7sg1zycbpdaz71mscrncw7rwjzqk2ia6j04rwxm"))))
67
  (build-system gnu-build-system)
68
  (arguments
69
   `(#:make-flags '("SCHEMA_ORG_FILE=schema.org/schema.jsonld")))
70
  (inputs
71
   `(("guile" ,guile-3.0)
72
     ("guile-json" ,my-guile-json)
73
     ("guile-jsonld" ,guile-jsonld)
74
     ("guile-gcrypt" ,guile-gcrypt)))
75
  (native-inputs
76
   `(("automake" ,automake)
77
     ("autoconf" ,autoconf)
78
     ("pkg-config" ,pkg-config)
79
     ("texinfo" ,texinfo)))
80
  (home-page "https://framagit.org/tyreunom/guile-fediverse")
81
  (synopsis "Implementation of multiple Fediverse algorithms")
82
  (description "")
83
  (license license:lgpl3+))
84