diff options
Diffstat (limited to 'index.md.do')
| -rw-r--r-- | index.md.do | 27 |
1 files changed, 0 insertions, 27 deletions
diff --git a/index.md.do b/index.md.do deleted file mode 100644 index 3155cb7..0000000 --- a/index.md.do +++ /dev/null | |||
| @@ -1,27 +0,0 @@ | |||
| 1 | #!/usr/bin/env bash | ||
| 2 | |||
| 3 | LISTS=() | ||
| 4 | while read -r -d $'\0'; do | ||
| 5 | LISTS+=("$REPLY") | ||
| 6 | done < <(find lists -maxdepth 1 -mindepth 1 -type d -not -name '.*' -print0 | sort -z) | ||
| 7 | |||
| 8 | for x in "${LISTS[@]}"; do | ||
| 9 | printf "%s.html\0" "$x" | ||
| 10 | printf "rss/%s.rss\0" "$(basename $x)" | ||
| 11 | done | xargs -r -0 redo-ifchange | ||
| 12 | |||
| 13 | cat <<EOF | ||
| 14 | % Index | ||
| 15 | |||
| 16 | This is a blog. | ||
| 17 | It contains things. | ||
| 18 | Send things to <blog@dirty-haskell.org> if you so choose. | ||
| 19 | |||
| 20 | EOF | ||
| 21 | |||
| 22 | for x in "${LISTS[@]}"; do | ||
| 23 | printf "* [%s](%s) ([RSS](rss/%s))\n" "$(<$x/title)" "$x.html" "$(basename $x).rss" | ||
| 24 | while read -r -d $'\n'; do | ||
| 25 | printf " %s\n" "$REPLY" | ||
| 26 | done < "$x/preview" | ||
| 27 | done | ||
