##say:runsub recordit;
##ask:runsub recordit;

##recordit:
load $actor's whatsaid;
loop paste $init_msg;
save $actor's whatsaid;
print "[$actor] recorded '$init_msg"';