mdebray/tvl-depot
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

feat(gs/emacs): Add commands to enable/disable tvl notifications

Browse source 
Change-Id: Ie43680eeb963e9328adc9f79107fff2d0911cc99
Reviewed-on: https://cl.tvl.fyi/c/depot/+/2362
Tested-by: BuildkiteCI
Reviewed-by: glittershark <grfn@gws.fyi>
This commit is contained in:
Griffin Smith 2021-01-13 10:16:49 -05:00 committed by glittershark
parent 7850ad0321
commit bbea618a98
1 changed files with 8 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
users/glittershark/emacs.d/irc.el
View file

@ -28,6 +28,14 @@
(setq tvl-enabled? t) (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) (defun erc-alert-important-p (info)
(let ((message (plist-get info :message)) (let ((message (plist-get info :message))
(erc-message (-> info (plist-get :data) (plist-get :message))) (erc-message (-> info (plist-get :data) (plist-get :message)))