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

[guix-commits]

nckx pushed a commit to branch master
in repository guix.

commit 30edb241a9ba50fefbd08438b5ffba25b10c6e61
Author: ( <paren@disroot.org>
AuthorDate: Fri Jun 24 18:56:28 2022 +0100

    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>
---
 guix/build/dub-build-system.scm | 10 ++--------
 1 file changed, 2 insertions(+), 8 deletions(-)

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