Add: app/irc: make truncate nick character customizable

This commit is contained in:
Benjamin Andresen 2017-08-06 12:54:09 +02:00
parent 5fe3cfbc75
commit 2286a6404f

View file

@ -3,6 +3,9 @@
(defvar +irc-left-padding 13 (defvar +irc-left-padding 13
"TODO") "TODO")
(defvar +irc-truncate-nick-char ?…
"Character to displayed when nick > `+irc-left-padding' in length.")
(defvar +irc-scroll-to-bottom-on-commands (defvar +irc-scroll-to-bottom-on-commands
'(self-insert-command yank hilit-yank) '(self-insert-command yank hilit-yank)
"If these commands are called pre prompt the buffer will scroll to `point-max'.") "If these commands are called pre prompt the buffer will scroll to `point-max'.")
@ -93,7 +96,7 @@ playback.")
:nick))) :nick)))
(when (> (length nick) +irc-left-padding) (when (> (length nick) +irc-left-padding)
(compose-region (+ beg +irc-left-padding -1) end (compose-region (+ beg +irc-left-padding -1) end
?…))))) +irc-truncate-nick-char)))))
(add-hook 'lui-pre-output-hook #'+irc*circe-truncate-nicks) (add-hook 'lui-pre-output-hook #'+irc*circe-truncate-nicks)
(defun +irc|circe-message-option-bot (nick &rest ignored) (defun +irc|circe-message-option-bot (nick &rest ignored)