guix_mirror_bot pushed a commit to branch master
in repository guix.
commit e28bf7c6f6773b809219d4322f13269f7829f855
Author: Efraim Flashner <[email protected]>
AuthorDate: Wed Sep 10 10:50:11 2025 +0300
gnu: ntp: Find the location of installed binaries.
* gnu/packages/ntp.scm (ntp)[arguments]: Add a phase to set the full
path of the installed binaries.
Change-Id: I70d8a67c451ee01cce9afbc0bcd783b72dbc78be
---
gnu/packages/ntp.scm | 10 ++++++++++
1 file changed, 10 insertions(+)
diff --git a/gnu/packages/ntp.scm b/gnu/packages/ntp.scm
index d67fe7a4a3..79e97992a7 100644
--- a/gnu/packages/ntp.scm
+++ b/gnu/packages/ntp.scm
@@ -204,6 +204,16 @@ time-stamping or reference clock, sub-microsecond accuracy
is possible.")
"scripts/update-leap/update-leap.in")
(("https://www.ietf.org/timezones/data/leap-seconds.list";)
"https://data.iana.org/time-zones/data/leap-seconds.list";))))
+ (add-after 'unpack 'use-absolute-path-in-files
+ (lambda _
+ (substitute* "scripts/lib/NTP/Util.pm"
+ (("(ntpq_path = ')ntpq(';)" _ first last)
+ (string-append first #$output "/bin/ntpq" last))
+ (("(sntp_path = ')sntp(';)" _ first last)
+ (string-append first #$output "/bin/sntp" last)))
+ (substitute* "scripts/calc_tickadj/calc_tickadj.in"
+ (("`tickadj`")
+ (string-append "`" #$output "/bin/tickadj`")))))
(add-after 'install 'adjust-scripts
(lambda _
(substitute* (string-append #$output "/bin/calc_tickadj")
