diff options
| -rw-r--r-- | gnu/packages/guile-xyz.scm | 14 |
1 files changed, 13 insertions, 1 deletions
diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm index 2a6bd8071d..7b44dc3167 100644 --- a/gnu/packages/guile-xyz.scm +++ b/gnu/packages/guile-xyz.scm @@ -16,7 +16,7 @@ ;;; Copyright © 2017 Theodoros Foradis <[email protected]> ;;; Copyright © 2017 Nikita <[email protected]> ;;; Copyright © 2017, 2018, 2021 Tobias Geerinckx-Rice <[email protected]> -;;; Copyright © 2018, 2021, 2022 Maxim Cournoyer <[email protected]> +;;; Copyright © 2018, 2021, 2022, 2023 Maxim Cournoyer <[email protected]> ;;; Copyright © 2018, 2019, 2020, 2021, 2022, 2023 Arun Isaac <[email protected]> ;;; Copyright © 2018 Pierre-Antoine Rouby <[email protected]> ;;; Copyright © 2018 Eric Bavier <[email protected]> @@ -2278,6 +2278,18 @@ users and in some situations.") (base32 "1q1snj8gz2bvqw2v2jvwlzn5xfh7f7wlp922isnzismrp4adc918")))) (build-system gnu-build-system) + (arguments + (list + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'patch-extension-path + (lambda _ + ;; Provide the absolute path of the guile-libudev extension to + ;; ensure the dlopen call always succeeds. + (substitute* (find-files "." "\\.scm") + (("load-extension \"libguile-udev\"") + (format #f "load-extension \"~a/lib/libguile-udev.so\"" + #$output)))))))) (native-inputs (list autoconf automake gettext-minimal |