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