mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-25 05:48:07 -05:00
gnu: libical: Fix substitution of path to time zone database.
Fixes <https://bugs.gnu.org/26039>.
This is a followup to commit 2b193389d2
.
* gnu/packages/calendar.scm (arguments): Update 'patch-paths' phase.
This commit is contained in:
parent
3ffaec136f
commit
be81133a13
1 changed files with 6 additions and 5 deletions
|
@ -1,6 +1,6 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2015 David Thompson <davet@gnu.org>
|
||||
;;; Copyright © 2015, 2016 Leo Famulari <leo@famulari.name>
|
||||
;;; Copyright © 2015, 2016, 2017 Leo Famulari <leo@famulari.name>
|
||||
;;; Copyright © 2016 Kei Kebreau <kei@openmailbox.org>
|
||||
;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2016 Troy Sankey <sankeytms@gmail.com>
|
||||
|
@ -64,10 +64,11 @@ (define-public libical
|
|||
(lambda _
|
||||
(let ((tzdata (assoc-ref %build-inputs "tzdata")))
|
||||
(substitute* "src/libical/icaltz-util.c"
|
||||
(("char \\*search_paths \\[\\] =.*$")
|
||||
(string-append
|
||||
"char *search_paths [] = "
|
||||
"{\"" tzdata "/share/zoneinfo\"};\n"))))
|
||||
(("\\\"/usr/share/zoneinfo\\\",")
|
||||
(string-append "\"" tzdata "/share/zoneinfo\""))
|
||||
(("\\\"/usr/lib/zoneinfo\\\",") "")
|
||||
(("\\\"/etc/zoneinfo\\\",") "")
|
||||
(("\\\"/usr/share/lib/zoneinfo\\\"") "")))
|
||||
#t)))))
|
||||
(native-inputs
|
||||
`(("perl" ,perl)))
|
||||
|
|
Loading…
Reference in a new issue