about summary refs log tree commit diff
diff options
context:
space:
mode:
authorGriffin Smith <grfn@gws.fyi>2021-01-13T15·16-0500
committerglittershark <grfn@gws.fyi>2021-01-13T16·53+0000
commitbbea618a98251d1699ed0b1035b32d54f36bb342 (patch)
treedbeee99dd826a2cf1d32a081735f99374cad9e83
parent7850ad03219d4f144f8a8265ee89feaa9bbb2009 (diff)
feat(gs/emacs): Add commands to enable/disable tvl notifications r/2088
Change-Id: Ie43680eeb963e9328adc9f79107fff2d0911cc99
Reviewed-on: https://cl.tvl.fyi/c/depot/+/2362
Tested-by: BuildkiteCI
Reviewed-by: glittershark <grfn@gws.fyi>
-rw-r--r--users/glittershark/emacs.d/irc.el8
1 files changed, 8 insertions, 0 deletions
diff --git a/users/glittershark/emacs.d/irc.el b/users/glittershark/emacs.d/irc.el
index 866c7d556530..6d378fe2075e 100644
--- a/users/glittershark/emacs.d/irc.el
+++ b/users/glittershark/emacs.d/irc.el
@@ -28,6 +28,14 @@
 
 (setq tvl-enabled? t)
 
+(defun disable-tvl-notifications ()
+  (interactive)
+  (setq tvl-enabled? nil))
+
+(defun enable-tvl-notifications ()
+  (interactive)
+  (setq tvl-enabled? t))
+
 (defun erc-alert-important-p (info)
   (let ((message (plist-get info :message))
         (erc-message (-> info (plist-get :data) (plist-get :message)))