From 82bc9d6a0221952f260a5dc4c558db2afe4f8f7a Mon Sep 17 00:00:00 2001
From: Pierre Neidhardt <mail@ambrevar.xyz>
Date: Thu, 3 Oct 2019 15:56:16 +0200
Subject: [PATCH] local/bin/homesync: Don't snapshot subvolumes, don't generate
 package lists.

---
 .local/bin/homesync | 26 +++-----------------------
 1 file changed, 3 insertions(+), 23 deletions(-)

diff --git a/.local/bin/homesync b/.local/bin/homesync
index 9541b4d7..ee81920a 100755
--- a/.local/bin/homesync
+++ b/.local/bin/homesync
@@ -58,27 +58,6 @@ message() {
 	echo -e "$YELLOW:: $@$NORMAL"
 }
 
-section Snapshot subvolumes if older then 1 day
-while IFS= read -r fs; do
-	for subvol in private public; do
-		last=$(ls -1 .snapshots/"$subvol" | tail -1 | sed 's/_/ /')
-		if [ -z "$last" ]; then
-			continue
-		fi
-		last_date=$(date --date="$last" +%s)
-		now=$(date +%s)
-		if [ $(($now - $last_date)) -gt 86400 ]; then
-			message "Snapshot $fs/$subvol"
-			btrfs-snap "$fs/$subvol"
-		fi
-		unset now
-		unset last_date
-		unset last
-	done
-done <<EOF
-$(findmnt -t btrfs -n --output TARGET)
-EOF
-
 if [ -n "$OPT_DATAROOT" ]; then
 	section Data index
 	for i in "$OPT_DATAROOT"/*; do
@@ -123,8 +102,9 @@ if [ -n "$OPT_DEVICE" ]; then
 	sudo cryptsetup close gpg_backup
 fi
 
-section "$HOME/.package-lists"
-package-lister
+## No need for package-list with Guix manifests.
+# section "$HOME/.package-lists"
+# package-lister
 
 if [ -f ~/.cache/emacs/eshell/history ]; then
 	section "Shell history"