From 291df666bd9839b281b1f654365aba84a3278b15 Mon Sep 17 00:00:00 2001 From: Pierre Neidhardt Date: Tue, 26 May 2020 15:22:19 +0200 Subject: guix scripts: Mention Guix checkouts + gcroots/auto when warning about disk space. * guix/scripts.scm (warn-about-disk-space): Mention Guix checkouts, system profiles and gcroots/auto. --- guix/scripts.scm | 20 ++++++++++++++++---- 1 file changed, 16 insertions(+), 4 deletions(-) diff --git a/guix/scripts.scm b/guix/scripts.scm index 3e19e38957..c90c3b840c 100644 --- a/guix/scripts.scm +++ b/guix/scripts.scm @@ -241,11 +241,23 @@ THRESHOLDS is a pair (ABSOLUTE-THRESHOLD . RELATIVE-THRESHOLD)." absolute-threshold-in-bytes)) (warning (G_ "only ~,1f GiB of free space available on ~a~%") (/ available 1. GiB) (%store-prefix)) - (display-hint (format #f (G_ "Consider deleting old profile -generations and collecting garbage, along these lines: + (if profile + (display-hint (format #f (G_ "Consider deleting old profile +generations, deleting old Guix checkouts and collecting garbage, along these +lines: @example -guix gc --delete-generations=1m -@end example\n")))))) +guix package --profile=~s --delete-generations=1m +guix pull --delete-generations=20d # Guix checkouts +guix system delete-generations=2..9 # System generations +guix gc --free-space=5G +@end example + +You might also want to delete old non-default profiles pointed to by +the symlinks in /var/guix/gcroots/auto (broken symlinks in this +directory will be automatically removed).") + profile)) + (display-hint (G_ "Consider running @command{guix gc} to free +space.")))))) ;;; scripts.scm ends here -- cgit v1.2.3