12 comment=issues/$issue/comment
15 trap "rm -f $tmp" HUP PIPE INT QUIT TERM EXIT
16 { $PERL -npe 's/^/# /' < $comment ; print } > $tmp
17 zmodload -F zsh/stat b:zstat
18 zstat -A ctimePrev +ctime $tmp
20 zstat -A ctime +ctime $tmp
21 [[ $ctime != $ctimePrev ]] || {
22 echo Aborting comment >&2
25 if [[ -s $comment ]]; then
26 $PERL -ne 'print if $can; if (/^$/) { $can=1 };' < $tmp > $comment