From fa0efe393d3a756fd1ff5a7fe339e7f610a7a389 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Wed, 3 Apr 2024 05:04:41 +0300 Subject: emacs:(erc) Update keybindings & configuration --- .emacs.d/init.el | 12 ++++-------- .emacs.d/modules/thanos-commands.el | 17 ++++++----------- 2 files changed, 10 insertions(+), 19 deletions(-) diff --git a/.emacs.d/init.el b/.emacs.d/init.el index b088803..32f70b4 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -621,15 +621,11 @@ (setf erc-modules '(sasl netsplit fill button match track completion readonly networks ring autojoin noncommands irccontrols move-to-prompt stamp - menu list))) + menu list)) + :bind (("C-c E" . 'erc-libera) + :map erc-mode-map + ("C-c RET" . 'erc-cmd-QUERY))) -(defun erc-libera () - "Login to liberachat with erc." - (interactive) - (erc-tls :server "irc.libera.chat" :port 6697 - :nick "thanosapollo" - :user "thanosapollo" - :password (password-store-get "liberachat/thanos_apollo"))) (use-package erc-image :ensure t :after erc diff --git a/.emacs.d/modules/thanos-commands.el b/.emacs.d/modules/thanos-commands.el index beb474b..55c7d7c 100644 --- a/.emacs.d/modules/thanos-commands.el +++ b/.emacs.d/modules/thanos-commands.el @@ -257,18 +257,13 @@ (let ((input-method (nth thanos/input-methods-index thanos/input-methods))) (set-input-method (if (string= "nil" input-method) nil input-method)))) -(defun thanos/sync-notes () - "Sync org-oram notes" +(defun erc-libera () + "Login to liberachat with erc." (interactive) - (let ((git (executable-find "git")) - (default-directory org-roam-directory)) - (message "Synching org-roam notes %s" org-roam-directory) - (unless git - (error "Git not found, please install git")) - (unless (file-exists-p (expand-file-name ".git" gnosis-dir)) - (message "Creating git repository") - (vc-create-repo 'Git)) - (vc-git-push nil))) + (erc-tls :server "irc.libera.chat" :port 6697 + :nick "thanosapollo" + :user "thanosapollo" + :password (password-store-get "liberachat/thanos_apollo"))) (provide 'thanos-commands) ;;; thanos-commands.el ends here -- cgit v1.2.3