Revert "q" - 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 cbc6de5317f14555e3bea8be9cab373df217676d
 (DIR) parent 35a0195af623a556f03b366d2801b9db07076d98
 (HTM) Author: Annna Robert-Houdin <annna@bitreich.org>
       Date:   Sun, 31 Jul 2022 11:53:34 +0200
       
       Revert "q"
       
       This reverts commit 35a0195af623a556f03b366d2801b9db07076d98.
       
       Diffstat:
         M annna-message-common                |       5 -----
         D responsibility                      |      20 --------------------
       
       2 files changed, 0 insertions(+), 25 deletions(-)
       ---
 (DIR) diff --git a/annna-message-common b/annna-message-common
       @@ -395,11 +395,6 @@ case "${text}" in
                        annna-say -s "${server}" -c "${channel}" "${user}, ${breachtext}"
                fi
                ;;
       -"${botname}, please be responsible about "*)
       -        word="$(printf "%s\n" "${text}" | cut -c 36- | sed 's,\t,    ,g')"
       -        suri="$(responsibility "${word}"  | bitreich-paste)"
       -        annna-say -s "${server}" -c "${channel}" "${suri}"
       -        ;;
        "${botname}, please say "*)
                word="$(printf "%s\n" "${text}" | cut -c 19- | sed 's,\t,    ,g')"
                suri="$(printf "%s\n" "${word}" | bitreich-speak)"
 (DIR) diff --git a/responsibility b/responsibility
       @@ -1,20 +0,0 @@
       -#!/bin/sh
       -
       -template="$HOME/bin/modules/responsibility/say-no-to.vtv"
       -replacemarker="{PLEASE_REPLACE_THIS}"
       -replacelength="$(utf8expr length "${replacemarker}")"
       -replaceneutral="' ' ' ' ' ' ' ' ' ' '"
       -
       -inputreplacement="$@"
       -if [ -z "$inputreplacement" ];
       -then
       -        replacement="$replaceneutral"
       -else
       -        replacement="$(utf8expr substr "$(printf "%*s" $replacelength "${inputreplacement}")" 1 $replacelength)"
       -fi
       -
       -replacement="$(printf "%s\n" "$replacement" | tr '[:lower:]' '[:upper:]')"
       -
       -sed "s|{PLEASE_REPLACE_THIS}|$replacement|g" $template
       -
       -