From 122d73ac9d2472f91ed00965d03d1e761da72699 Mon Sep 17 00:00:00 2001
From: Ben Sima <ben@bensima.com>
Date: Tue, 16 Dec 2025 08:20:54 -0500
Subject: refactor: Rename Bot to Ava, remove cost guardrail

- Rename Omni/Bot.hs to Omni/Ava.hs
- Delete Omni/Bot.scm (unused Guile version)
- Remove cost limit (was 10 cents, now 0)
- Increase max iterations from 10 to 50
---
 Omni/Bot.hs | 66 -------------------------------------------------------------
 1 file changed, 66 deletions(-)
 delete mode 100755 Omni/Bot.hs

(limited to 'Omni/Bot.hs')

diff --git a/Omni/Bot.hs b/Omni/Bot.hs
deleted file mode 100755
index 77a0408..0000000
--- a/Omni/Bot.hs
+++ /dev/null
@@ -1,66 +0,0 @@
-#!/usr/bin/env run.sh
-{-# LANGUAGE OverloadedStrings #-}
-{-# LANGUAGE QuasiQuotes #-}
-{-# LANGUAGE NoImplicitPrelude #-}
-
--- | Omni Bot - Family assistant via Telegram.
---
--- Usage:
---   bot                    # Uses TELEGRAM_BOT_TOKEN env var
---   bot --token=XXX        # Explicit token
---   bot --model=MODEL      # Override LLM model
---
--- : out bot
--- : dep aeson
--- : dep http-conduit
--- : dep stm
-module Omni.Bot where
-
-import Alpha
-import qualified Data.Text as Text
-import qualified Omni.Agent.Telegram as Telegram
-import qualified Omni.Cli as Cli
-import qualified Omni.Test as Test
-import qualified System.Console.Docopt as Docopt
-
-main :: IO ()
-main = Cli.main plan
-
-plan :: Cli.Plan ()
-plan =
-  Cli.Plan
-    { Cli.help = help,
-      Cli.move = move,
-      Cli.test = test,
-      Cli.tidy = \_ -> pure ()
-    }
-
-help :: Cli.Docopt
-help =
-  [Cli.docopt|
-bot - Omni family assistant via Telegram
-
-Usage:
-  bot [--token=TOKEN] [--model=MODEL]
-  bot test
-  bot (-h | --help)
-
-Options:
-  -h --help       Show this help
-  --token=TOKEN   Telegram bot token (or use TELEGRAM_BOT_TOKEN env)
-  --model=MODEL   LLM model to use [default: anthropic/claude-sonnet-4]
-|]
-
-move :: Cli.Arguments -> IO ()
-move args = do
-  let maybeToken = fmap Text.pack (Cli.getArg args (Cli.longOption "token"))
-  Telegram.startBot maybeToken
-
-test :: Test.Tree
-test =
-  Test.group
-    "Omni.Bot"
-    [ Test.unit "help is non-empty" <| do
-        let usage = str (Docopt.usage help) :: String
-        null usage Test.@=? False
-    ]
-- 
cgit v1.2.3