handle more irc control characters
This commit is contained in:
parent
2574410708
commit
27251a4512
6
init.el
6
init.el
@ -540,9 +540,15 @@
|
|||||||
(setq-local completing-read-function #'completing-read-default)
|
(setq-local completing-read-function #'completing-read-default)
|
||||||
(setq-local completion-in-region-function #'completion--in-region))
|
(setq-local completion-in-region-function #'completion--in-region))
|
||||||
|
|
||||||
|
;; https://github.com/mgalgs/.emacs.d/blob/master/init.el#L599-L602
|
||||||
|
(defun mgalgs-erc-ansi-colors ()
|
||||||
|
"For ansi color escape sequences"
|
||||||
|
(ansi-color-apply-on-region (point-min) (point-max)))
|
||||||
|
|
||||||
:hook
|
:hook
|
||||||
((erc-insert-post erc-send-post) . erc-save-buffer-in-logs)
|
((erc-insert-post erc-send-post) . erc-save-buffer-in-logs)
|
||||||
((erc-mode) . basil-default-completion)
|
((erc-mode) . basil-default-completion)
|
||||||
|
((erc-insert-modify) . mgalgs-erc-ansi-colors)
|
||||||
:config
|
:config
|
||||||
(load (concat user-utils "erc-faces"))
|
(load (concat user-utils "erc-faces"))
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user