Commit edfd341b816f
Changed files (1)
.emacs.d
.emacs.d/emacs.org
@@ -3178,70 +3178,6 @@
(define-key vde/launcher-map "b" #'scratch)))
#+END_SRC
-* Irc
-
- Why not putting all the thing in Emacs =:). IRC is one of them and
- let's try something different than the good old ERC : let's try
- circe.
-
- Let's also try to add notifications too, because I miss this a
- bit. There is some [[https://github.com/eqyiel/circe-notifications#caveats][caveats]] with the setup I have (using znc) so this
- configuration is probably dumber than it should but.. /meh/..
- #+BEGIN_SRC emacs-lisp
- (use-package circe
- :ensure t
- :config
- (progn
- (defun my-circe-prompt ()
- (lui-set-prompt
- (concat (propertize (concat (buffer-name) ">")
- 'face 'circe-my-message-face)
- " ")))
-
- (setq
- lui-time-stamp-position 'right-margin
- lui-time-stamp-format "%H:%M")
- (defun my-circe-set-margin ()
- (setq right-margin-width 5))
-
- ;; Fix the completion to not use emacs or helm
- (setq circe-use-cycle-completion t)
- (setq helm-mode-no-completion-in-region-in-modes
- '(circe-channel-mode
- circe-query-mode
- circe-server-mode))
-
- (add-hook 'lui-mode-hook 'my-circe-set-margin)
- (add-hook 'circe-chat-mode-hook 'my-circe-prompt)
-
- (use-package helm-circe
- :ensure t
- :config
- (progn
- ;;;###autoload
- (defun helm-circe-all ()
- "Custom helm buffer for circe channel and server buffers only."
- (interactive)
- (let ((sources
- '(helm-circe/circe-new-activity-source
- helm-circe/circe-channel-buffer-source
- helm-circe/circe-query-buffer-source
- helm-circe/circe-server-buffer-source)))
- (helm :sources sources
- :buffer "*helm-circe*")))
-
-
- (defun yenda/circe-connect-or-helm ()
- (interactive)
- (if (car (circe-server-buffers))
- (helm-circe-all)
- (circe "znc-freenode")
- ;; (circe "slack-zenika")
- ))
-
- (global-set-key (kbd "<f8>") (lambda() (interactive) (yenda/circe-connect-or-helm)))))))
- #+END_SRC
-