- printf '[div #chat'
- # tail -n30 -f "$chatfile" | {
- # read x
- # while read -r date nick message; do
- # printf '[p .message [span .date %s] [span .nick [span .indicator %s]%s:] [span .message %s]]\n' \
- # "${date#*_}" "${nick%${nick#?}}" "$(UNSTRING "${nick#?}" |HTML)" "$(UNSTRING "$message" |HTML)"
- # done
- # }
- tail -n50 -f "$chatfile" \
- | sed -nuE '
- /^[^ ]+ [^ ]+ [^ ]+$/{
- h; s;^([^ ]+) ([^ ]+) ([^ ]+)$;\1;; s;.*_;;; s;.+;[p .message [span .date &];p;
- g; s;^([^ ]+) ([^ ]+) ([^ ]+)$;a\2;; bESC; :A s;.;;; s;(.)(.+);[span .nick [span .indicator \1]\2];p;
- g; s;^([^ ]+) ([^ ]+) ([^ ]+)$;b\3;; bESC; :B s;.;;; s;.+;[span .message &]];p;
- }
- b; :ESC
- '"$UNSTRING"' '"$SHESCAPE"'
- /^a/bA; /^b/bB;
- '
- } |yield_page channel
- fi
- ;;
-esac
+ while sleep 10; do printf '\n'; done &
+ printf '[div #chat'
+ tail --pid $$ -n50 -f "$chatfile" \
+ | sed -nuE '
+ /^[^ ]+ [^ ]+ [^ ]+$/{
+ h; s;^([^ ]+) ([^ ]+) ([^ ]+)$;\1;; s;.*_;;; s;.+;[p .message [span .date &];p;
+ g; s;^([^ ]+) ([^ ]+) ([^ ]+)$;a\2;; bESC; :A s;.;;; s;(.)(.+);[span .nick [span .indicator \1]\2];p;
+ g; s;^([^ ]+) ([^ ]+) ([^ ]+)$;b\3;; bESC; :B s;.;;; s;.+;[span .message &]];p;
+ }
+ b; :ESC
+ '"$UNSTRING"' '"$SHESCAPE"'
+ /^a/bA; /^b/bB;
+ '
+ } |yield_page channel
+fi