--- a/nun/tasks/findundone.sh	Fri Dec 23 02:24:19 2011 +0200
+++ b/nun/tasks/findundone.sh	Fri Dec 23 02:26:51 2011 +0200
@@ -1,7 +1,14 @@
 #!/bin/sh
+TASKDATA="taskdata.txt"
+FINDREQS="findreqs.pl"
 
 if test "x$1" = "x"; then
+	echo "Find and compute list of undone nun tasks"
 	echo "Usage: $0 <logfile>"
+	echo ""
+	echo "Logfile's last 500 lines MUST contain output of 'list' command"
+	echo "from the nun guild task room (at Sister Evelyn)."
+	echo "Also requires $TASKDATA and $FINDREQS script."
 	exit 0
 fi
 
@@ -13,7 +20,7 @@
 tail -500 "$LOGFILE" | perl -e 'my @tmp; while (<STDIN>) { if(/^  \| ([A-Z][^|]+)\| \[ \:. \]/) { $s = $1; $s =~ s/ *$//; push(@tmp,$s); }} print "$_\n" foreach (sort { $a cmp $b} @tmp); print STDERR "Found ".(scalar @tmp)." tasks.\n";' > "$TMPFILE"
 
 echo "Checking for missing (unopened) tasks ..."
-perl -w findreqs.pl -tasks < taskdata.txt | while read i; do
+perl -w "$FINDREQS" -tasks < "$TASKDATA" | while read i; do
 	if ! grep "^$i" "$TMPFILE" > /dev/null; then
 		echo "* $i"
 	fi