blob: 38bc73f945cfc0a36d07a2d1c2ce4d50c66531c3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
|
(define-module (gn packages javascript)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (gnu packages)
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (guix git-download)
#:use-module (guix utils)
#:use-module (guix build-system gnu)
#:use-module (guix build-system trivial)
#:use-module (srfi srfi-1))
(define-public javascript-twitter-post-fetcher
(let ((commit "377c050def3a1076c15cb24fd20b71f801d0e78f"))
(package
(name "javascript-twitter-post-fetcher")
(version (string-append "16.0.3" "-" (string-take commit 7)))
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/genenetwork/Twitter-Post-Fetcher.git")
(commit commit)))
(file-name (string-append name "-" commit))
(sha256
(base32
"05w2wiqw84lb778nkivn421m1kk6h66xk4cjjqng1bri3d2kfzjv"))))
(build-system trivial-build-system)
(native-inputs `(
("source" ,source)))
(arguments
`(#:modules ((guix build utils))
#:builder
(let* ((out (assoc-ref %outputs "out"))
(name "gn2_data_s")
(tarfn (string-append name ".tar"))
(targetdir (string-append out "/share/genenetwork2/"))
)
(begin
(use-modules (guix build utils))
(let ((source (assoc-ref %build-inputs "source"))
)
(and
; (zero? (system* lz4unpack source "-d" tarfn))
; (zero? (system* tar "xf" tarfn))
; (mkdir-p targetdir)
(copy-recursively source targetdir)
))))))
(home-page "http://jasonmayes.com/projects/twitterApi/")
(synopsis "Twitter post fetching")
(description "Twitter post fetching.")
(license license:expat))))
|