X-Git-Url: https://code.delx.au/dotemacs/blobdiff_plain/be24e945280960522f330f56beed5299bad2f681..e7e86b440d1f35fb6a32d072fce38ddbc27dc98f:/packages/check.sh

diff --git a/packages/check.sh b/packages/check.sh
new file mode 100755
index 0000000..8f0b17f
--- /dev/null
+++ b/packages/check.sh
@@ -0,0 +1,9 @@
+#!/bin/bash
+
+set -eu
+
+cd "$(dirname "$0")"
+
+grep submodule ../.git/config |cut -d'"' -f2|while read -r x; do ls "$x" &> /dev/null || echo ".git/config remove $x"; done
+
+find ../.git/modules/ -type d -name objects -printf '%h\n'|while read -r x; do x="$(basename "$x")"; ls "$x" &> /dev/null || echo "rm -rf .git/modules/$x"; done