Update guix package declaration
guix.scm
19 | 19 | ((guix licenses) #:prefix license:) | |
20 | 20 | (guix build-system gnu) | |
21 | 21 | (guix download) | |
22 | + | (guix gexp) | |
22 | 23 | (guix git-download) | |
23 | 24 | (guix packages) | |
24 | 25 | (guix utils) | |
… | |||
29 | 30 | (gnu packages texinfo) | |
30 | 31 | (gnu packages tls)) | |
31 | 32 | ||
33 | + | (define %srcdir | |
34 | + | (dirname (current-filename))) | |
35 | + | ||
32 | 36 | (package | |
33 | 37 | (name "guile-netlink") | |
34 | 38 | (version "0.1") | |
35 | - | (source | |
36 | - | (origin | |
37 | - | (method git-fetch) | |
38 | - | (uri (git-reference | |
39 | - | (url "https://framagit.org/tyreunom/guile-netlink") | |
40 | - | (commit version))) | |
41 | - | (file-name (git-file-name name version)) | |
42 | - | (sha256 | |
43 | - | (base32 | |
44 | - | "0zfn3nwlz6xzip1j8xbj768dc299r037cfc81bk6kwl9xhzkjbrg")))) | |
39 | + | (source (local-file "." "guile-netlink-checkout" | |
40 | + | #:recursive? #t | |
41 | + | #:select? (git-predicate %srcdir))) | |
45 | 42 | (build-system gnu-build-system) | |
46 | 43 | (arguments | |
47 | 44 | `(#:tests? #f)); no tests | |
… | |||
52 | 49 | ("autoconf" ,autoconf) | |
53 | 50 | ("pkg-config" ,pkg-config) | |
54 | 51 | ("texinfo" ,texinfo))) | |
55 | - | (home-page "https://framagit.org/tyreunom/guile-netlink") | |
56 | - | (synopsis "") | |
57 | - | (description "") | |
52 | + | (home-page "https://git.lepiller.eu/guile-netlink") | |
53 | + | (synopsis "Netlink protocol implementation for Guile") | |
54 | + | (description "Guile Netlink is a GNU Guile library providing an implementation | |
55 | + | of the netlink protocol. | |
56 | + | ||
57 | + | It provides a generic library for writing implementations of a netlink | |
58 | + | protocol, a low-level rtnetlink implementation that uses that library and a | |
59 | + | high-level API for network management that uses rtnetlink.") | |
58 | 60 | (license license:gpl3+)) |