The latest and greatest updates that you crave, now

1 files changed, 24 insertions, 0 deletions

diff --git a/src/wasp-event-handlers-binary.el b/src/wasp-event-handlers-binary.el
new file mode 100644
index 00000000..ae373b8c
--- /dev/null
+++ b/src/wasp-event-handlers-binary.el
@@ -0,0 +1,24 @@
+;;; wasp-event-handlers-binary --- Event handlers -*- lexical-binding: t; -*-
+;;; Commentary:
+;;; Code:
+
+(require 'dash)
+(require 's)
+(require 'wasp-utils)
+(require 'wasp-twitch)
+(require 'wasp-bus-binary)
+
+(setf
+  w/bus-binary-event-handlers
+  (list
+    (cons "monitor twitch chat incoming"
+      (lambda (d)
+        (-let [(user stags msg) (s-split-up-to " " d 2)]
+          (w/twitch-handle-incoming-chat
+            user
+            (--map (s-split "\t" it) (s-split "\n" stags))
+            msg)))))
+    ))
+
+(provide 'wasp-event-handlers-binary)
+;;; wasp-event-handlers-binary.el ends here