build-system/dub: Don't expect ‘.dub/dub.json’.

This file is no longer produced by our version of Dub.

* guix/build/dub-build-system.scm (build, check): Remove obsolete
substitutions.

Signed-off-by: Tobias Geerinckx-Rice <me@tobias.gr>
This commit is contained in:
( 2022-06-24 18:56:28 +01:00 committed by Tobias Geerinckx-Rice
parent ba95bbbac5
commit 30edb241a9
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79

View File

@ -91,17 +91,11 @@ user's profile root."
(unless (or (grep* "sourceLibrary" "package.json") (unless (or (grep* "sourceLibrary" "package.json")
(grep* "sourceLibrary" "dub.sdl") ; note: format is different! (grep* "sourceLibrary" "dub.sdl") ; note: format is different!
(grep* "sourceLibrary" "dub.json")) (grep* "sourceLibrary" "dub.json"))
(apply invoke `("dub" "build" ,@dub-build-flags)) (apply invoke `("dub" "build" ,@dub-build-flags))))
(substitute* ".dub/dub.json"
(("\"lastUpgrade\": \"[^\"]*\"")
"\"lastUpgrade\": \"1970-01-01T00:00:00.0000000\""))))
(define* (check #:key tests? #:allow-other-keys) (define* (check #:key tests? #:allow-other-keys)
(when tests? (when tests?
(invoke "dub" "test") (invoke "dub" "test")))
(substitute* ".dub/dub.json"
(("\"lastUpgrade\": \"[^\"]*\"")
"\"lastUpgrade\": \"1970-01-01T00:00:00.0000000\""))))
(define* (install #:key inputs outputs #:allow-other-keys) (define* (install #:key inputs outputs #:allow-other-keys)
"Install a given DUB package." "Install a given DUB package."