diff options
| -rw-r--r-- | assets/avatars/clonkhead.png | bin | 0 -> 1150494 bytes | |||
| -rw-r--r-- | assets/badges/offkai2026.png | bin | 0 -> 413 bytes | |||
| -rw-r--r-- | src/gizmo/wasp-combo.el | 1 | ||||
| -rw-r--r-- | src/gizmo/wasp-debt.el | 2 | ||||
| -rw-r--r-- | src/gizmo/wasp-fakechat.el | 2 | ||||
| -rw-r--r-- | src/gizmo/wasp-flymake.el | 2 | ||||
| -rw-r--r-- | src/gizmo/wasp-prod.el | 2 | ||||
| -rw-r--r-- | src/gizmo/wasp-resolve.el | 2 | ||||
| -rw-r--r-- | src/gizmo/wasp-uwoomfie.el | 15 | ||||
| -rw-r--r-- | src/wasp-event-handlers.el | 4 | ||||
| -rw-r--r-- | src/wasp-gizmo.el | 2 | ||||
| -rw-r--r-- | src/wasp-overlay.el | 1 | ||||
| -rw-r--r-- | src/wasp-setup.el | 6 | ||||
| -rw-r--r-- | src/wasp-twitch-chat-commands.el | 4 | ||||
| -rw-r--r-- | src/wasp-twitch-redeems.el | 4 | ||||
| -rw-r--r-- | src/wasp-voice-commands.el | 2 | ||||
| -rw-r--r-- | wasp.el | 13 |
17 files changed, 25 insertions, 37 deletions
diff --git a/assets/avatars/clonkhead.png b/assets/avatars/clonkhead.png Binary files differnew file mode 100644 index 00000000..7c67b23b --- /dev/null +++ b/assets/avatars/clonkhead.png diff --git a/assets/badges/offkai2026.png b/assets/badges/offkai2026.png Binary files differnew file mode 100644 index 00000000..a4c05072 --- /dev/null +++ b/assets/badges/offkai2026.png diff --git a/src/gizmo/wasp-combo.el b/src/gizmo/wasp-combo.el index ae8b4d4f..1feab29e 100644 --- a/src/gizmo/wasp-combo.el +++ b/src/gizmo/wasp-combo.el @@ -49,7 +49,6 @@ (setf w/combo-words (ht<-alist (car res))) (setf w/combo-word-phonemes (ht<-alist (cdr res))))) ;; (w/combo-words-load) -(w/combo-words-load-cache) (defun w/combo-split-words (sentence) "Split SENTENCE into uppercase words." diff --git a/src/gizmo/wasp-debt.el b/src/gizmo/wasp-debt.el index 4548f3a4..6d59c4c4 100644 --- a/src/gizmo/wasp-debt.el +++ b/src/gizmo/wasp-debt.el @@ -102,7 +102,5 @@ (incf w/debt-seconds 10)) (add-hook 'w/gizmo-update-hook #'w/debt-upload) -(w/debt-data-fetch) - (provide 'wasp-debt) ;;; wasp-debt.el ends here diff --git a/src/gizmo/wasp-fakechat.el b/src/gizmo/wasp-fakechat.el index ff7ed5d5..97d4398c 100644 --- a/src/gizmo/wasp-fakechat.el +++ b/src/gizmo/wasp-fakechat.el @@ -6,7 +6,7 @@ (require 's) (require 'f) (require 'ht) -(require 'soundboard) +(require 'soundboard nil t) (require 'wasp-utils) (require 'wasp-chat) (require 'wasp-audio) diff --git a/src/gizmo/wasp-flymake.el b/src/gizmo/wasp-flymake.el index b727d2c9..5b4eca57 100644 --- a/src/gizmo/wasp-flymake.el +++ b/src/gizmo/wasp-flymake.el @@ -58,8 +58,6 @@ "Setup stream Flymake errors." (unless (-contains? flymake-diagnostic-functions #'w/flymake-backend) (add-hook 'flymake-diagnostic-functions #'w/flymake-backend nil t))) -(add-hook 'prog-mode-hook #'w/flymake-setup) -(add-hook 'eglot-managed-mode-hook #'w/flymake-setup) (provide 'wasp-flymake) ;;; wasp-flymake.el ends here diff --git a/src/gizmo/wasp-prod.el b/src/gizmo/wasp-prod.el index dbfe19c6..f798d700 100644 --- a/src/gizmo/wasp-prod.el +++ b/src/gizmo/wasp-prod.el @@ -14,7 +14,7 @@ (require 'wasp-chat) (require 'wasp-twitch) (require 'wasp-biblicality) -(require 'soundboard) +(require 'soundboard nil t) (defcustom w/prod-server "https://prod.kr" "Server URL for prodzpod." diff --git a/src/gizmo/wasp-resolve.el b/src/gizmo/wasp-resolve.el index 1fc757d2..9fd9ae10 100644 --- a/src/gizmo/wasp-resolve.el +++ b/src/gizmo/wasp-resolve.el @@ -16,7 +16,7 @@ (w/user-get user (lambda (data) - (when-let ((resolution (alist-get :resolution data))) + (when-let* ((resolution (alist-get :resolution data))) (add-to-list 'w/resolve-recorded user) (with-current-buffer (get-buffer-create w/resolve-buffer) (goto-char (point-max)) diff --git a/src/gizmo/wasp-uwoomfie.el b/src/gizmo/wasp-uwoomfie.el index 1c5e32ee..5271a632 100644 --- a/src/gizmo/wasp-uwoomfie.el +++ b/src/gizmo/wasp-uwoomfie.el @@ -60,13 +60,14 @@ ((-contains? w/uwoomfie-honorary-viewers user) 'honored) (t nil))) -(w/uwoomfie-fetch-honorary-viewers - (lambda (users) - (setf w/uwoomfie-honorary-viewers users))) - -(w/uwoomfie-fetch-cool-people - (lambda (users) - (setf w/uwoomfie-cool-people (cons "Watchmakering" users)))) +(defun w/uwoomfie-initialize () + "Initialize Uwoomfie caches." + (w/uwoomfie-fetch-honorary-viewers + (lambda (users) + (setf w/uwoomfie-honorary-viewers users))) + (w/uwoomfie-fetch-cool-people + (lambda (users) + (setf w/uwoomfie-cool-people (cons "Watchmakering" users))))) (provide 'wasp-uwoomfie) ;;; wasp-uwoomfie.el ends here diff --git a/src/wasp-event-handlers.el b/src/wasp-event-handlers.el index 3aee77b5..04ba860d 100644 --- a/src/wasp-event-handlers.el +++ b/src/wasp-event-handlers.el @@ -2,7 +2,7 @@ ;;; Commentary: ;;; Code: -(require 'soundboard) +(require 'soundboard nil t) (require 'wasp-bus) (require 'wasp-twitch) (require 'wasp-friend) @@ -23,7 +23,7 @@ (cons '(monitor nethack monster) (lambda (data) - (when-let ((sp (s-split " " (car data)))) + (when-let* ((sp (s-split " " (car data)))) (setf planet/last-monster (cons (s-join " " (cdr sp)) (string-to-number (car sp)))) (planet/render-monster-summary)))) (cons diff --git a/src/wasp-gizmo.el b/src/wasp-gizmo.el index e0359c08..ad6589d9 100644 --- a/src/wasp-gizmo.el +++ b/src/wasp-gizmo.el @@ -72,7 +72,7 @@ w/gizmo-update-timer (run-with-timer 10 nil #'w/gizmo-run-update-timer))) -(require 'htmlize) +(require 'htmlize nil t) (defvar w/gizmo-html-cache (ht-create)) (defun w/gizmo-render-html (buf) "Render BUF to HTML with embedded images." diff --git a/src/wasp-overlay.el b/src/wasp-overlay.el index cc334f8a..cd0df601 100644 --- a/src/wasp-overlay.el +++ b/src/wasp-overlay.el @@ -138,7 +138,6 @@ Optionally, make the cells be COLOR." (make-frame-invisible w/overlay-clippy-frame) (let ((window (frame-selected-window w/overlay-clippy-frame))) (set-window-buffer window (w/overlay-clippy-frame-buffer)))) -(w/overlay-clippy-frame-create) (defun w/overlay-clippy-clear () "Clear the Clippy buffer." (when w/overlay-clippy-frame diff --git a/src/wasp-setup.el b/src/wasp-setup.el index 4c3ab1ba..f72f3c1b 100644 --- a/src/wasp-setup.el +++ b/src/wasp-setup.el @@ -28,6 +28,7 @@ (windmove-right) (split-window-vertically -28) (windmove-down) + (w/overlay-clippy-frame-create) ) (defun w/setup-connections () @@ -50,8 +51,11 @@ (interactive) ;; initialization (w/setup-connections) - + (w/combo-words-load-cache) (w/badge-populate-cache) + (w/debt-data-fetch) + (add-hook 'prog-mode-hook #'w/flymake-setup) + (add-hook 'eglot-managed-mode-hook #'w/flymake-setup) ;; timers (w/twitch-run-shoutout-timer) diff --git a/src/wasp-twitch-chat-commands.el b/src/wasp-twitch-chat-commands.el index 4436db62..70ad1406 100644 --- a/src/wasp-twitch-chat-commands.el +++ b/src/wasp-twitch-chat-commands.el @@ -2,7 +2,7 @@ ;;; Commentary: ;;; Code: -(require 'soundboard) +(require 'soundboard nil t) (require 'wasp-twitch) (require 'wasp-ai) (require 'wasp-8ball) @@ -18,7 +18,7 @@ (cons "!oub" (lambda (_ _ msg) - (when-let ((buf (get-buffer "*cider-repl libcolonq/pit:localhost:7888(pit)*"))) + (when-let* ((buf (get-buffer "*cider-repl libcolonq/pit:localhost:7888(pit)*"))) (nrepl-sync-request:eval (s-trim (s-chop-prefix "!oub" msg)) buf)))) (cons "!commands" diff --git a/src/wasp-twitch-redeems.el b/src/wasp-twitch-redeems.el index 9d0bd009..c1e3b6c0 100644 --- a/src/wasp-twitch-redeems.el +++ b/src/wasp-twitch-redeems.el @@ -4,7 +4,7 @@ (require 'dash) (require 's) -(require 'soundboard) +(require 'soundboard nil t) (require 'wasp-utils) (require 'wasp-twitch) (require 'wasp-model) @@ -301,7 +301,7 @@ (if (and spell target (stringp spell) (stringp target)) (progn (w/chat-write-event (s-concat user " hexed " target " with: " spell)) - (when-let ((type (alist-get spell w/hex-types nil nil #'s-equals?))) + (when-let* ((type (alist-get spell w/hex-types nil nil #'s-equals?))) (w/hex target user type))) (w/chat-write-event (s-concat user "'s hex fizzled out with a puff of smoke!")))))) (list diff --git a/src/wasp-voice-commands.el b/src/wasp-voice-commands.el index 255f8cb8..d71b1ecb 100644 --- a/src/wasp-voice-commands.el +++ b/src/wasp-voice-commands.el @@ -2,7 +2,7 @@ ;;; Commentary: ;;; Code: -(require 'soundboard) +(require 'soundboard nil t) (require 'wasp-audio) (require 'wasp-twitch) (require 'wasp-chat) @@ -39,7 +39,7 @@ (require 'wasp-gizmo) (require 'wasp-setup) -;; gizmos +;; active gizmos (require 'wasp-pronunciation) (require 'wasp-biblicality) (require 'wasp-glossary) @@ -59,10 +59,6 @@ (require 'wasp-gcp) (require 'wasp-aoc) (require 'wasp-resolve) -;; (require 'wasp-hexamedia) -;; (require 'wasp-copfish) -;; (require 'wasp-shindaggers) -;; (require 'wasp-uwoomfie) (require 'wasp-density) (require 'wasp-wikipedia) (require 'wasp-prod) @@ -87,13 +83,6 @@ (require 'wasp-event-handlers) (require 'wasp-event-handlers-binary) -;; user contrib -;; (require 'muzak) - -;; (defun w/fix-user-database-ok (user) -;; "Fix USER's database entry." -;; (w/user-set user (fig//db2-serialize-old-entry (fig//load-db-old user)))) - (setq elisp-flymake-byte-compile-load-path load-path) (provide 'wasp) |
