diff options
| author | Craig Jennings <c@cjennings.net> | 2026-05-13 16:06:38 -0500 |
|---|---|---|
| committer | Craig Jennings <c@cjennings.net> | 2026-05-13 16:06:38 -0500 |
| commit | 8fc423d90eff78176fa538f2cf838cb671592e99 (patch) | |
| tree | 072823a4400a76ece4d0204119be554c6535ef05 /tests | |
| parent | c3ec8508a8ff414d099d9e567eb5ffd43a9c93f2 (diff) | |
| download | dotemacs-8fc423d90eff78176fa538f2cf838cb671592e99.tar.gz dotemacs-8fc423d90eff78176fa538f2cf838cb671592e99.zip | |
feat(telega): add telega.el module with docker-backed TDLib
New `modules/telega-config.el` configures telega.el as an in-Emacs Telegram client. `telega-use-docker' is on so TDLib runs in a container instead of needing a system-level build -- pairs with a follow-up `scripts/setup-telega.sh' for fresh-clone installs. First-run auth (phone + verification code) is interactive inside `M-x telega' and isn't scripted here.
Launcher binding: `C-; G` (mnemonic: teleGram). `C-; t` and `C-; m t` were both taken (test-runner, music's "repeat track"), so the launcher landed on a free top-level letter.
Two tests cover the wiring: module loads, launcher is bound.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/test-telega-config.el | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/tests/test-telega-config.el b/tests/test-telega-config.el new file mode 100644 index 00000000..ace96555 --- /dev/null +++ b/tests/test-telega-config.el @@ -0,0 +1,25 @@ +;;; test-telega-config.el --- Tests for Telegram (telega) module wiring -*- lexical-binding: t; -*- + +;;; Commentary: +;; Lightweight asserts that the module loads, exposes the launcher, +;; sets the docker preference, and registers the C-; G keybinding. +;; The bulk of telega.el's behaviour is owned upstream; the tests +;; here only cover what this config wires. + +;;; Code: + +(require 'ert) + +(add-to-list 'load-path (expand-file-name "modules" user-emacs-directory)) +(require 'telega-config) + +(ert-deftest test-telega-config-loads-cleanly () + "Normal: module loads without errors and `provide's its feature." + (should (featurep 'telega-config))) + +(ert-deftest test-telega-config-launcher-binding-is-telega () + "Normal: =C-; G= invokes `telega'." + (should (eq (keymap-lookup cj/custom-keymap "G") #'telega))) + +(provide 'test-telega-config) +;;; test-telega-config.el ends here |
