blob: 8f8a36ccf0cad05c064312a607715fb85776fb9e (
about) (
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
|
(define-module (awesome)
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (gnu packages)
#:use-module (gnu packages wm))
(define-public patched-awesome
(let ((version (package-version awesome)))
(package
(inherit awesome)
(name "patched-awesome")
(source
(origin
(method url-fetch)
(uri (string-append
"https://github.com/awesomeWM/awesome-releases/raw/"
"master/awesome-" version ".tar.xz"))
(sha256
(base32
"0kwpbls9h1alxcmvxh5g9qb995fds5b2ngcr44w0ibazkyls2pdc"))
(modules '((guix build utils)
(srfi srfi-19)))
(snippet '(begin
;; Remove non-reproducible timestamp and use the date
;; of the source file instead.
(substitute* "common/version.c"
(("__DATE__ \" \" __TIME__")
(date->string
(time-utc->date
(make-time time-utc 0
(stat:mtime (stat "awesome.c"))))
"\"~c\"")))
#t))
(patches (search-patches "awesome-reproducible-png.patch"
"patches/awesome-screen.patch")))))))
|