diff options
author | Griffin Smith <grfn@gws.fyi> | 2021-03-28T15·05-0400 |
---|---|---|
committer | glittershark <grfn@gws.fyi> | 2021-03-28T17·07+0000 |
commit | db62866d820cf524b67cebe34033d3928804cf3c (patch) | |
tree | 5a68fa9f462eae8f08ad78c4383bb9b321866d5b /web/panettone/src/irc.lisp | |
parent | 1f250e374d9da401e60f2db02151af8f6bdb7c28 (diff) |
feat(web/panettone): Noping issue authors' usernames r/2355
When sending irc notifications, insert a zero-width space after the first character of the username of the author of issues, to prevent that user from receiving a ping. Fixes: b/95 Change-Id: Ibcacb45129b2cb99b587744eb61f4f1dbc0060d6 Reviewed-on: https://cl.tvl.fyi/c/depot/+/2693 Tested-by: BuildkiteCI Reviewed-by: tazjin <mail@tazj.in>
Diffstat (limited to 'web/panettone/src/irc.lisp')
-rw-r--r-- | web/panettone/src/irc.lisp | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/web/panettone/src/irc.lisp b/web/panettone/src/irc.lisp index f116e2a70631..2ab72a2e391e 100644 --- a/web/panettone/src/irc.lisp +++ b/web/panettone/src/irc.lisp @@ -2,6 +2,12 @@ (in-package :panettone.irc) +(defun noping (s) + (format nil "~A~A~A" + (char s 0) + #\ZERO_WIDTH_SPACE + (subseq s 1))) + (defun get-irccat-config () "Reads the IRCCATHOST and IRCCATPORT environment variables, and returns them as two values" |