diff options
Diffstat (limited to '.config/emacs/jd-emacs/jd-emacs-ui.el')
| -rw-r--r-- | .config/emacs/jd-emacs/jd-emacs-ui.el | 154 |
1 files changed, 0 insertions, 154 deletions
diff --git a/.config/emacs/jd-emacs/jd-emacs-ui.el b/.config/emacs/jd-emacs/jd-emacs-ui.el deleted file mode 100644 index c8236af..0000000 --- a/.config/emacs/jd-emacs/jd-emacs-ui.el +++ /dev/null | |||
| @@ -1,154 +0,0 @@ | |||
| 1 | ;;; Dotfiles --- Jakub Dlugosz emacs config | ||
| 2 | ;;; Commentary: | ||
| 3 | |||
| 4 | ;;; Code: | ||
| 5 | |||
| 6 | (setq inhibit-startup-message t) | ||
| 7 | (setq visible-bell t) | ||
| 8 | (scroll-bar-mode -1) | ||
| 9 | (tool-bar-mode -1) | ||
| 10 | (tooltip-mode -1) | ||
| 11 | (menu-bar-mode -1) | ||
| 12 | (set-fringe-mode 10) | ||
| 13 | |||
| 14 | (set-face-attribute 'default nil :font "Terminus" :height 100) | ||
| 15 | |||
| 16 | (add-hook 'prog-mode-hook 'menu-bar--display-line-numbers-mode-relative) | ||
| 17 | |||
| 18 | (global-set-key (kbd "<escape>") 'keyboard-escape-quit) | ||
| 19 | |||
| 20 | (global-prettify-symbols-mode 1) | ||
| 21 | |||
| 22 | (defalias 'yes-or-no-p 'y-or-n-p) | ||
| 23 | |||
| 24 | (use-package doom-themes | ||
| 25 | :config | ||
| 26 | (load-theme 'ujelly t)) | ||
| 27 | |||
| 28 | (use-package diminish) | ||
| 29 | |||
| 30 | (use-package hl-todo | ||
| 31 | :init | ||
| 32 | (setq hl-todo-keyword-faces | ||
| 33 | '(("TODO" . "#FF0000") | ||
| 34 | ("FIXME" . "#FF0000") | ||
| 35 | ("DEBUG" . "#A020F0"))) | ||
| 36 | :config | ||
| 37 | (global-hl-todo-mode 1)) | ||
| 38 | |||
| 39 | (defun jd/switch-buffer () | ||
| 40 | (interactive) | ||
| 41 | (let ((completion-regexp-list '("\\`[^*]" | ||
| 42 | "\\`\\([^T]\\|T\\($\\|[^A]\\|A\\($\\|[^G]\\|G\\($\\|[^S]\\|S.\\)\\)\\)\\).*"))) | ||
| 43 | (call-interactively 'counsel-switch-buffer))) | ||
| 44 | |||
| 45 | (defvar jd/load-theme-hook nil) | ||
| 46 | (defun jd/load-theme () | ||
| 47 | (interactive) | ||
| 48 | (counsel-load-theme) | ||
| 49 | (run-hooks 'jd/load-theme-hook)) | ||
| 50 | |||
| 51 | (use-package ivy | ||
| 52 | :diminish | ||
| 53 | :bind | ||
| 54 | (("C-s" . swiper) | ||
| 55 | :map ivy-minibuffer-map | ||
| 56 | ("C-k" . ivy-previous-line) | ||
| 57 | ("C-j" . ivy-next-line) | ||
| 58 | :map ivy-switch-buffer-map | ||
| 59 | ("C-k" . ivy-previous-line)) | ||
| 60 | :config | ||
| 61 | (ivy-mode 1)) | ||
| 62 | |||
| 63 | (use-package counsel | ||
| 64 | :config | ||
| 65 | (counsel-mode 1)) | ||
| 66 | |||
| 67 | (jd/leader-key-def | ||
| 68 | "t" '(:ignore t :which-key "Toggle") | ||
| 69 | "tT" '(toggle-truncate-lines :which-key "Toggle truncate lines") | ||
| 70 | "tt" '(jd/load-theme :which-key "Choose theme")) | ||
| 71 | |||
| 72 | (jd/leader-key-def | ||
| 73 | "bb" '(jd/switch-buffer :which-key "Buffer switch") | ||
| 74 | "ba" '(counsel-switch-buffer :which-key "Buffer switch") | ||
| 75 | "b" '(:ignore t :which-key "Buffer") | ||
| 76 | "," '(counsel-switch-buffer :which-key "Buffer switch")) | ||
| 77 | |||
| 78 | (use-package which-key | ||
| 79 | :diminish | ||
| 80 | :config | ||
| 81 | (which-key-mode) | ||
| 82 | (setq which-key-idle-delay 0.3)) | ||
| 83 | |||
| 84 | (use-package all-the-icons) | ||
| 85 | |||
| 86 | (use-package doom-modeline | ||
| 87 | ; :init (doom-modeline-mode 0) | ||
| 88 | :custom ((doom-modeline-height 15))) | ||
| 89 | |||
| 90 | (use-package hydra | ||
| 91 | :defer t) | ||
| 92 | |||
| 93 | (defun jd/text-scale-increase () | ||
| 94 | (interactive) | ||
| 95 | (let ((old-face-attribute (face-attribute 'default :height))) | ||
| 96 | (set-face-attribute 'default nil :height (+ old-face-attribute 10)))) | ||
| 97 | |||
| 98 | (defun jd/text-scale-decrease () | ||
| 99 | (interactive) | ||
| 100 | (let ((old-face-attribute (face-attribute 'default :height))) | ||
| 101 | (set-face-attribute 'default nil :height (- old-face-attribute 10)))) | ||
| 102 | |||
| 103 | (defhydra hydra-resize-window (:timeout 4) | ||
| 104 | ("h" evil-window-decrease-width "<") | ||
| 105 | ("l" evil-window-increase-width ">") | ||
| 106 | ("k" evil-window-decrease-height "^") | ||
| 107 | ("j" evil-window-increase-height "v") | ||
| 108 | ("q" nil "finished" :exit t)) | ||
| 109 | |||
| 110 | (defhydra hydra-text-scale-global (:timeout 4) | ||
| 111 | "scale text" | ||
| 112 | ("j" jd/text-scale-increase "in") | ||
| 113 | ("k" jd/text-scale-decrease "out") | ||
| 114 | ("q" nil "finished" :exit t)) | ||
| 115 | |||
| 116 | (defhydra hydra-text-scale (:timeout 4) | ||
| 117 | "scale text" | ||
| 118 | ("j" text-scale-increase "in") | ||
| 119 | ("k" text-scale-decrease "out") | ||
| 120 | ("q" nil "finished" :exit t)) | ||
| 121 | |||
| 122 | (jd/leader-key-def | ||
| 123 | "tS" '(hydra-text-scale-global/body :which-key "Scale text") | ||
| 124 | "ts" '(hydra-text-scale/body :which-key "Scale text")) | ||
| 125 | |||
| 126 | (use-package beacon | ||
| 127 | :config | ||
| 128 | (beacon-mode 1)) | ||
| 129 | |||
| 130 | (jd/leader-key-def | ||
| 131 | "f" '(:ignore t :which-key "Files") | ||
| 132 | "fs" '(save-buffer :which-key "File save") | ||
| 133 | "." '(find-file :which-key "Find file") | ||
| 134 | "ff" '(find-file :which-key "Find file")) | ||
| 135 | |||
| 136 | (jd/leader-key-def | ||
| 137 | "e" '(:ignore t :which-key "Eval") | ||
| 138 | "eb" '(eval-buffer :which-key "Eval buffer") | ||
| 139 | "ee" '(eval-defun :which-key "Eval defun")) | ||
| 140 | |||
| 141 | (jd/leader-key-def | ||
| 142 | :keymaps '(visual) | ||
| 143 | "er" '(eval-region :which-key "Eval region")) | ||
| 144 | |||
| 145 | (defun jd/kill-other-buffers () | ||
| 146 | (interactive) | ||
| 147 | (mapc 'kill-buffer (cdr (buffer-list (current-buffer))))) | ||
| 148 | |||
| 149 | (jd/leader-key-def | ||
| 150 | "bK" '(jd/kill-other-buffers :which-key "Kill other buffers") | ||
| 151 | "bk" '(kill-current-buffer :which-key "Kill buffer") | ||
| 152 | "bB" '(ibuffer :which-key "Open ibuffer")) | ||
| 153 | |||
| 154 | ;;; jd-ui.el ends here | ||
