Fix -cleanup listing all repos as unused. See #11.

Shrikant Sharat
1 parent cd68a349f7
Showing 1 changed file with 5 additions and 2 deletions Side-by-side Diff
antigen.zsh
@@ -229,8 +229,11 @@ antigen-cleanup () {
  
     # Find directores in ADOTDIR/repos, that are not in the bundles record.
     local unused_clones="$(comm -13 \
-        <(-antigen-echo-record | awk '{print $1 "|" $4}' | sort -u) \
-        <(ls "$ADOTDIR/repos" | while read line; do
+        <(-antigen-echo-record \
+            | awk '{print ($4 == "-" ? $1 : $1 "|" $4)}' \
+            | sort -u) \
+        <(ls "$ADOTDIR/repos" \
+            | while read line; do
                 -antigen-get-clone-url "$line"
             done))"
...	...	@@ -229,8 +229,11 @@ antigen-cleanup () {
229	229
230	230	# Find directores in ADOTDIR/repos, that are not in the bundles record.
231	231	local unused_clones="$(comm -13 \
232		- <(-antigen-echo-record \| awk '{print $1 "\|" $4}' \| sort -u) \
233		- <(ls "$ADOTDIR/repos" \| while read line; do
	232	+ <(-antigen-echo-record \
	233	+ \| awk '{print ($4 == "-" ? $1 : $1 "\|" $4)}' \
	234	+ \| sort -u) \
	235	+ <(ls "$ADOTDIR/repos" \
	236	+ \| while read line; do
234	237	-antigen-get-clone-url "$line"
235	238	done))"
236	239