diff options
| author |  Uko Kokņevičs | 2025-10-13 05:51:01 +0300 |
|---|---|---|
| committer | Uko Kokņevičs | 2025-10-13 05:51:01 +0300 |
| commit | f8db5c3e3c4bb426e76e10993b09debdb84b0b57 (patch) | |
| tree | b79763459752153b2385645a4fabfa25641909ee /src/bot/impl.lisp | |
| parent | Move do-call &co to a transport package (diff) | |
| download | ukkoclot-f8db5c3e3c4bb426e76e10993b09debdb84b0b57.tar.gz ukkoclot-f8db5c3e3c4bb426e76e10993b09debdb84b0b57.tar.xz ukkoclot-f8db5c3e3c4bb426e76e10993b09debdb84b0b57.zip | |
Move bot/impl to state
Diffstat (limited to '')
| -rw-r--r-- | src/state.lisp (renamed from src/bot/impl.lisp) | 19 |
1 files changed, 13 insertions, 6 deletions
diff --git a/src/bot/impl.lisp b/src/state.lisp index ea1aa03..98e2048 100644 --- a/src/bot/impl.lisp +++ b/src/state.lisp | |||
| @@ -1,12 +1,19 @@ | |||
| 1 | ;; SPDX-License-Identifier: EUPL-1.2 | 1 | ;; SPDX-License-Identifier: EUPL-1.2 |
| 2 | ;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com> | 2 | ;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com> |
| 3 | (defpackage :ukkoclot/bot/impl | 3 | (defpackage :ukkoclot/state |
| 4 | (:use :c2cl :iterate :ukkoclot/config) | 4 | (:use :c2cl :ukkoclot/config) |
| 5 | (:export | 5 | (:export |
| 6 | :bot :bot-p :make-bot | 6 | #:bot |
| 7 | 7 | #:make-bot | |
| 8 | :bot-config :bot-db :bot-base-uri :bot-power-on :bot-username% :bot-id%)) | 8 | #:bot-p |
| 9 | (in-package :ukkoclot/bot/impl) | 9 | #:copy-bot |
| 10 | #:bot-config | ||
| 11 | #:bot-db | ||
| 12 | #:bot-base-uri | ||
| 13 | #:bot-power-on | ||
| 14 | #:bot-username% | ||
| 15 | #:bot-id%)) | ||
| 16 | (in-package :ukkoclot/state) | ||
| 10 | 17 | ||
| 11 | (defstruct (bot (:constructor make-bot%)) | 18 | (defstruct (bot (:constructor make-bot%)) |
| 12 | (config (error "No value given for config") :read-only t) | 19 | (config (error "No value given for config") :read-only t) |