summaryrefslogtreecommitdiffstats
path: root/.config/emacs/jd-emacs/jd-emacs-custom.el
diff options
context:
space:
mode:
Diffstat (limited to '.config/emacs/jd-emacs/jd-emacs-custom.el')
-rw-r--r--.config/emacs/jd-emacs/jd-emacs-custom.el36
1 files changed, 36 insertions, 0 deletions
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 @@
1;;; Dotfiles --- Jakub Dlugosz emacs config
2;;; Commentary:
3
4;;; Code:
5
6(defun jd/generete-qr-from-clipboard ()
7 (interactive)
8 (let ((clipboard-value (x-get-clipboard))
9 (clipboard-file-path "/tmp/clipboard_value.txt")
10 (clipboard-out-image "/tmp/qr.png"))
11 (with-temp-file clipboard-file-path
12 (insert clipboard-value))
13 (shell-command (concat
14 "qrencode -o "
15 clipboard-out-image
16 " < "
17 clipboard-file-path))
18 (find-file clipboard-out-image)))
19
20(defun jd-emacs/erc-notify-sound ()
21 (jd-exwm/run-in-background "mpv /home/jakub/.config/emacs/resources/beep.wav"))
22
23;; (add-hook 'erc-notifications-mode-hook #'jd-emacs/erc-notify-sound)
24
25(setq
26 erc-nick "bobbma"
27 erc-user-full-name "Jakub Dlugosz"
28 erc-notify-list '("akuleszaa"))
29
30;; Define a function to connect to a server
31(defun hipis-znc ()
32 (interactive)
33 (erc :server "195.74.91.18"
34 :port "6697"))
35
36;;; jd-custom.el ends here