(define-module (infiniteadaptability packages erlang)
#:use-module (gnu packages erlang)
+ #:use-module (guix gexp)
#:use-module (guix git-download)
- #:use-module (guix packages))
+ #:use-module (guix packages)
+ #:use-module (guix utils))
-(define-public erlang-28.1.1
+(define-public erlang-28.5.0.4
(package
(inherit erlang)
- (version "28.1.1")
+ (version "28.5.0.4")
(source
(origin
(method git-fetch)
(commit (string-append "OTP-" version))))
(file-name (git-file-name "erlang" version))
(sha256
- (base32 "0d97mmd6ja77rc7b82sx1vf6prfy9fn9jgvl92h2dm47s5pi1i8h"))))))
+ (base32 "0hr0pba1lzrrr4hydf0qhbrwa1mkzcbl07m5zmn65y6si3rb2f0j"))))
+ (arguments
+ (substitute-keyword-arguments (package-arguments erlang)
+ ((#:phases phases)
+ #~(modify-phases #$phases
+ (add-after 'unpack 'fix-erl-interface-clean
+ (lambda _
+ ;; erl_interface only creates its local erts/ directory when it
+ ;; borrows erl_md5.c from erts; with the bundled OpenSSL md5 that
+ ;; directory never exists, yet clean rmdirs it unconditionally.
+ (substitute* "lib/erl_interface/src/Makefile.in"
+ (("rm -f erts/\\*; rmdir erts")
+ "rm -rf erts"))))))))))
(define-public rebar
(package
(inherit rebar3)
- (inputs (modify-inputs (package-inputs rebar3)
- (replace "erlang" erlang-28.1.1)))))
+ (native-inputs (modify-inputs (package-native-inputs rebar3)
+ (replace "erlang" erlang-28.5.0.4)))))
-erlang-28.1.1
+erlang-28.5.0.4