Standardize sauna on CTCP ACTION format. - annna - Annna the nice friendly bot.
 (HTM) git clone git://bitreich.org/annna/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/annna/
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) Tags
 (DIR) README
       ---
 (DIR) commit dac93a3c1984a0f28af11f23e40b4194aaa2b36b
 (DIR) parent 4b1ee4dabd1beaa32f12b8e03f01e1b8b39cd19f
 (HTM) Author: Annna Robert-Houdin <annna@bitreich.org>
       Date:   Sat, 25 Jul 2026 14:12:14 +0200
       
       Standardize sauna on CTCP ACTION format.
       
       Diffstat:
         M annna-message-sauna                 |      10 +++++-----
       
       1 file changed, 5 insertions(+), 5 deletions(-)
       ---
 (DIR) diff --git a/annna-message-sauna b/annna-message-sauna
       @@ -7,17 +7,17 @@ JOIN) annna-say "Welcome ${IRC_CMD_USER}! Please grab a towel and have fun!";;
        PART) annna-say $'\001ACTION puts the towel in the laundry.\001';;
        PRIVMSG)
                case "${IRC_PRIVMSG_TEXT}" in
       -        "${IRC_USER}, please give me a towel"*) annna-say "$(echo -e '\001')ACTION gives ${IRC_CMD_USER} a towel.$(echo -e '\001')";;
       -        "${IRC_USER}, please add some aroma"*) annna-say $'\001ACTION pours an aromatic infusion in the sauna.\001';;
       -        "${IRC_USER}, please pour some water"*) annna-say $'\001ACTION pours water on the stones.\001';;
       -        "${IRC_USER}, please clean the sauna"*) annna-say $'\001ACTION cleans the sauna.\001';;
       +        "${IRC_USER}, please give me a towel"*) annna-say $'\001ACTION'" gives ${IRC_CMD_USER} a towel."$'\001';;
       +        "${IRC_USER}, please add some aroma"*) annna-say $'\001ACTION'" pours an aromatic infusion in the sauna."$'\001';;
       +        "${IRC_USER}, please pour some water"*) annna-say $'\001ACTION'" pours water on the stones."$'\001';;
       +        "${IRC_USER}, please clean the sauna"*) annna-say $'\001ACTION'" cleans the sauna."$'\001';;
                esac;;
        PONG)
                action=$(($RANDOM % 50))
                case "${action}" in
                2)
                        event="$(sauna-event)"
       -                [ -n "${event}" ] && annna-say "$'\001ACTION' ${event}$'\001'";;
       +                [ -n "${event}" ] && annna-say $'\001ACTION'" ${event}"$'\001';;
                esac;;
        esac