From ef565a486511cbbb86e0d1f80264b3b57d2ac88a Mon Sep 17 00:00:00 2001 From: jdlugosz963 Date: Sat, 10 Jun 2023 09:36:37 +0200 Subject: Migrate from .org to .el Emacs config. --- .config/emacs/jd-emacs/jd-emacs-custom.el | 36 +++++++++++++++++++++++++++++++ 1 file changed, 36 insertions(+) create mode 100644 .config/emacs/jd-emacs/jd-emacs-custom.el (limited to '.config/emacs/jd-emacs/jd-emacs-custom.el') diff --git a/.config/emacs/jd-emacs/jd-emacs-custom.el b/.config/emacs/jd-emacs/jd-emacs-custom.el new file mode 100644 index 0000000..aef824f --- /dev/null +++ b/.config/emacs/jd-emacs/jd-emacs-custom.el @@ -0,0 +1,36 @@ +;;; Dotfiles --- Jakub Dlugosz emacs config +;;; Commentary: + +;;; Code: + +(defun jd/generete-qr-from-clipboard () + (interactive) + (let ((clipboard-value (x-get-clipboard)) + (clipboard-file-path "/tmp/clipboard_value.txt") + (clipboard-out-image "/tmp/qr.png")) + (with-temp-file clipboard-file-path + (insert clipboard-value)) + (shell-command (concat + "qrencode -o " + clipboard-out-image + " < " + clipboard-file-path)) + (find-file clipboard-out-image))) + +(defun jd-emacs/erc-notify-sound () + (jd-exwm/run-in-background "mpv /home/jakub/.config/emacs/resources/beep.wav")) + +;; (add-hook 'erc-notifications-mode-hook #'jd-emacs/erc-notify-sound) + +(setq + erc-nick "bobbma" + erc-user-full-name "Jakub Dlugosz" + erc-notify-list '("akuleszaa")) + +;; Define a function to connect to a server +(defun hipis-znc () + (interactive) + (erc :server "195.74.91.18" + :port "6697")) + +;;; jd-custom.el ends here -- cgit v1.2.3