diff options
| -rw-r--r-- | guix-data-service/jobs/load-new-guix-revision.scm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/guix-data-service/jobs/load-new-guix-revision.scm b/guix-data-service/jobs/load-new-guix-revision.scm index cdfe8b0..30eadc5 100644 --- a/guix-data-service/jobs/load-new-guix-revision.scm +++ b/guix-data-service/jobs/load-new-guix-revision.scm @@ -1079,12 +1079,15 @@ WHERE job_id = $1") #:authenticate? fetch-with-authentication?)))))) (inferior-eval '(use-modules (srfi srfi-1) + (ice-9 history) (guix channels) (guix grafts) (guix profiles)) inferior) (inferior-eval '(%graft? #f) inferior) + (inferior-eval '(disable-value-history!) + inferior) (inferior-eval '(define channel-instance (@@ (guix channels) channel-instance)) inferior) @@ -1249,11 +1252,15 @@ WHERE job_id = $1") (inferior-eval '(use-modules (srfi srfi-1) (srfi srfi-34) + (ice-9 history) (guix grafts) (guix derivations) (gnu tests)) inf) + (inferior-eval '(disable-value-history!) + inf) + ;; For G_ and P_ (or (inferior-eval '(and (resolve-module '(guix i18n) #:ensure #f) (use-modules (guix i18n)) |