gitile/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 (guix packages)
19
             (guix licenses)
20
             (guix build-system gnu)
21
             (guix git-download)
22
             (gnu packages autotools)
23
             (gnu packages gnupg)
24
             (gnu packages guile)
25
             (gnu packages guile-xyz)
26
             (gnu packages pkg-config)
27
             (gnu packages texinfo)
28
             (gnu packages tls))
29
30
(define my-guile-git
31
  (package
32
    (inherit guile-git)
33
    (source (origin
34
              (method git-fetch)
35
              (uri (git-reference
36
                     (url "https://gitlab.com/roptat/guile-git")
37
                     (commit "c39ab944d8004d3ab751a9e27336469afec081eb")))
38
              (file-name (git-file-name "guile-git" "0.4.0.c39ab94"))
39
              (sha256
40
               (base32
41
                "0hknsv9r7pjahmxkvd7zpz93saki5kymh88xs6pb4h9d0ssp4fmp"))))
42
    (native-inputs
43
     `(("autoconf" ,autoconf)
44
       ("automake" ,automake)
45
       ("texinfo" ,texinfo)
46
       ,@(package-native-inputs guile-git)))))
47
48
(package
49
  (name "gitile")
50
  (version "0.1")
51
  (source #f)
52
  (build-system gnu-build-system)
53
  (propagated-inputs
54
   `(("guile-git" ,my-guile-git)
55
     ("guile-gcrypt" ,guile-gcrypt)
56
     ("gnutls" ,gnutls)
57
     ("guile-fibers" ,guile-fibers)))
58
  (native-inputs
59
   `(("autoconf" ,autoconf)
60
     ("automake" ,automake)
61
     ("libtool" ,libtool)
62
     ("pkg-config" ,pkg-config)
63
     ("guile" ,guile-3.0)))
64
  (home-page "https://git.lepiller.eu")
65
  (synopsis "")
66
  (description "")
67
  (license gpl3+))
68