Show disappeared feeds

[feeder.git] / urls2feeds.zsh

diff --git a/urls2feeds.zsh b/urls2feeds.zsh
index 9eb5c5b18a326364575a4938d586c6ec8e9303f8..e878ece04d71ffacd30453e99debd51c4e3207fb 100755 (executable)
--- a/urls2feeds.zsh
+++ b/urls2feeds.zsh
@@ -1,6 +1,7 @@
 #!/usr/bin/env zsh
 set -e
 autoload regexp-replace
+typeset -A seen
 while read url ; do
     url="$url " # to be sure that next line will work
     url=${${=url}[1]}
@@ -8,7 +9,9 @@ while read url ; do
     regexp-replace dir "^.*__" ""
     regexp-replace dir "_$" "" || :
     dir=feeds/$dir
+    seen[$dir]=1
     [[ -e $dir ]] && continue || :
     mkdir -p $dir/{cur,new,tmp} # make it maildir
     echo "$url" > $dir/url
 done
+for dir (feeds/*) [[ $seen[$dir] -eq 1 ]] || print disappeared: $dir