catpoint-karaoke: limit line width - 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 39e1d433e78da302b032da1eff6207e5c6b9c61c
(DIR) parent 8084f27ff0a20207e49a58d2136c1b9f0811279b
(HTM) Author: Anders Damsgaard <anders@adamsgaard.dk>
Date: Sat, 1 Aug 2026 13:40:22 +0200
catpoint-karaoke: limit line width
Signed-off-by: Annna Robert-Houdin <annna@bitreich.org>
Diffstat:
M modules/catpoint-karaoke/catpoint-… | 5 +++--
M modules/catpoint-karaoke/requireme… | 1 +
2 files changed, 4 insertions(+), 2 deletions(-)
---
(DIR) diff --git a/modules/catpoint-karaoke/catpoint-karaoke.sh b/modules/catpoint-karaoke/catpoint-karaoke.sh
@@ -1,5 +1,5 @@
#!/bin/sh
-python="${KARAOKE_PYTHON:-./.venv/bin/python}"
+pyenv="${KARAOKE_VENV:-./.venv}"
gpt="${KARAOKE_GPT:-/home/annna/bin/gpt}"
outdir="${KARAOKE_OUT:-/br/gopher/karaoke}"
article="$(mktemp).md"
@@ -8,7 +8,7 @@ maxtries=4
tries=0
while [ $tries -lt $maxtries ];
do
- if "${python}" ./wikipedia-random >"${article}"
+ if "${pyenv}/bin/python" ./wikipedia-random >"${article}"
then
if test "$(wc -l "${article}" | awk '{print $1}')" -ge 25
then
@@ -23,6 +23,7 @@ done
prompt="Create a funny presentation. <presentation_spec>$(cat pres-format.md)</presentation_spec>. <presentation_content>$(cat "${article}")</presentation_content>"
response="$(printf '%s\n' "${prompt}" | NO_PASTING=1 "${gpt}")"
printf '%s' "$response" >"${article}"
+"${pyenv}/bin/mdformat" --wrap 80 "${article}"
hash="$(sha1sum "${article}" | cut -c 1-8)"
presdir="${outdir}/${hash}"
(DIR) diff --git a/modules/catpoint-karaoke/requirements.txt b/modules/catpoint-karaoke/requirements.txt
@@ -1 +1,2 @@
wikipedia
+mdformat