diff options
Diffstat (limited to 'config.org')
| -rw-r--r-- | config.org | 287 |
1 files changed, 287 insertions, 0 deletions
diff --git a/config.org b/config.org new file mode 100644 index 0000000..0ab91ee --- /dev/null +++ b/config.org @@ -0,0 +1,287 @@ +* Terminal + +** Setting default shell to zsh +#+begin_src emacs-lisp + (defvar my-term-shell "/usr/bin/zsh") + (defadvice ansi-term (before force-bash) + (interactive (list my-term-shell))) + (ad-activate 'ansi-term) + (global-set-key (kbd "<s-C-return>") 'ansi-term) +#+end_src + +* QoL section +Some quality-of-life improvements + +** Enable line number +Certain modes will break with line-numbers-mode (e.g. ansi-term) so I'm only enabling it +on some major modes rather than globally +#+begin_src emacs-lisp + (add-hook 'prog-mode-hook 'display-line-numbers-mode) + (add-hook 'text-mode-hook 'display-line-numbers-mode) +#+end_src + +** Show parent parentheses +#+begin_src emacs-lisp + (show-paren-mode 1) +#+end_src + +** Enable rainbow-delimiters in all programming modes +#+begin_src emacs-lisp + (add-hook 'prog-mode-hook 'rainbow-delimiters-mode) +#+end_src + +** Disable default startup screen +#+begin_src emacs-lisp + (setq inhibit-startup-message t) +#+end_src + +** Disable most GUI elements +#+begin_src emacs-lisp + (tool-bar-mode -1) + (menu-bar-mode -1) + (scroll-bar-mode -1) +#+end_src + +** Enable copy-pasting outside of emacs +#+begin_src emacs-lisp + (setq x-select-enable-clipboard t) +#+end_src + +** Disable automatic creation of backup files +#+begin_src emacs-lisp + (setq make-backup-files nil) + (setq auto-save-default nil) +#+end_src + +** Enable conservative scrolling +#+begin_src emacs-lisp + (setq scroll-conservatively 100) +#+end_src + +** Disable ring-bell +#+begin_src emacs-lisp + (setq ring-bell-function 'ignore) +#+end_src + +** Indentation +#+begin_src emacs-lisp + (setq-default tab-width 4) + (setq-default standard-indent 4) + (setq c-basic-offset tab-width) + (setq-default electric-indent-inhibit t) + (setq-default indent-tabs-mode t) + (setq backward-delete-char-untabify-method 'nil) +#+end_src + +** Enable prettify symbols +#+begin_src emacs-lisp + (global-prettify-symbols-mode t) +#+end_src + +** Enable pair-matching +#+begin_src emacs-lisp + (electric-pair-mode t) +#+end_src + +** Creating new window automatically focuses it +#+begin_src emacs-lisp + (defun split-and-follow-horizontally () + (interactive) + (split-window-below) + (balance-windows) + (other-window 1)) + (global-set-key (kbd "C-x 2") 'split-and-follow-horizontally) + + (defun split-and-follow-vertically () + (interactive) + (split-window-right) + (balance-windows) + (other-window 1)) + (global-set-key (kbd "C-x 3") 'split-and-follow-vertically) +#+end_src + +** Change yes/no prompt to just y/n +#+begin_src emacs-lisp + (defalias 'yes-or-no-p 'y-or-n-p) +#+end_src + +** More comfortable resize bindings +#+begin_src emacs-lisp + (global-set-key (kbd "s-C-<left>") 'shrink-window-horizontally) + (global-set-key (kbd "s-C-<right>") 'enlarge-window-horizontally) + (global-set-key (kbd "s-C-<down>") 'shrink-window) + (global-set-key (kbd "s-C-<up>") 'enlarge-window) +#+end_src + +** Highlight current line +#+begin_src emacs-lisp + (global-hl-line-mode t) +#+end_src + +** Enable ido mode +#+begin_src emacs-lisp + (setq ido-enable-flex-matching nil) + (setq ido-create-new-buffer 'always) + (setq ido-everywhere t) + (setq ido-vertical-define-keys 'C-n-and-C-p-only) + (ido-mode 1) +#+end_src + +** Change default buffer-list +I hate the default buffer list. I'm using ido-switch-buffer on "C-x C-b" and +ibuffer on "C-x b" + +#+begin_src emacs-lisp + (global-set-key (kbd "C-x C-b") 'ido-switch-buffer) + (global-set-key (kbd "C-x b") 'ibuffer) +#+end_src + +* Org mode +Defining sensible org-mode defaults + +#+begin_src emacs-lisp + (use-package org + :config + (add-hook 'org-mode-hook 'org-indent-mode) + (add-hook 'org-mode-hook + #'(lambda () + (visual-line-mode 1)))) + + (use-package org-indent + :diminish org-indent-mode) + + (use-package htmlize + :ensure t) +#+end_src + +* Custom functions + +** Toggle transparency +#+begin_src emacs-lisp + (defun toggle-transparency() + (interactive) + (let ((alpha (frame-parameter nil 'alpha))) + (set-frame-parameter + nil 'alpha + (if (eql (cond ((numberp alpha) alpha) + ((numberp (cdr alpha)) (cdr alpha)) + ;; Also handle undocumented (<active> <inactive>) form. + ((numberp (cadr alpha)) (cadr alpha))) + 100) + '(80 . 80) '(100 . 100))))) + (global-set-key (kbd "C-c t") 'toggle-transparency) +#+end_src + +** Config edit/reload + +*** edit +#+begin_src emacs-lisp + (defun config-visit () + (interactive) + (find-file "~/.emacs.d/config.org")) + (global-set-key (kbd "C-c e") 'config-visit) +#+end_src + +*** reload +#+begin_src emacs-lisp + (defun config-reload () + (interactive) + (org-babel-load-file (expand-file-name "~/.emacs.d/config.org"))) + (global-set-key (kbd "C-c r") 'config-reload) +#+end_src + +* Use-Package section + +** Initialize =auto-package-update= + +*** Description +Auto-package-update automatically updates and removes old packages + +*** Code +#+begin_src emacs-lisp + (use-package auto-package-update + :defer nil + :ensure t + :config + (setq auto-package-update-delete-old-versions t) + (setq auto-package-update-hide-results t) + (auto-package-update-maybe)) +#+end_src + +** Initialize =diminish= + +*** Description +Hides minor modes to prevent cluttering mode line + +*** Code +#+begin_src emacs-lisp + (use-package diminish + :ensure t) +#+end_src + +** Initialize =which-key= + +*** Description +Completion menu for keybinds + +*** Code +#+begin_src emacs-lisp + (use-package which-key + :ensure t + :diminish which-key-mode + :init + (which-key-mode)) +#+end_src + +** Initialize =ido-vertical-mode= + +*** Description +Uses a vertical mini-buffer for ido, instead of a horizontal one + +*** Code +#+begin_src emacs-lisp + (use-package ido-vertical-mode + :ensure t + :init + (ido-vertical-mode 1)) +#+end_src + +** Initialize =smex= + +*** Description +Vertical buffer for interactive commands, similar to ido-vertical + +*** Code +#+begin_src emacs-lisp + (use-package smex + :ensure t + :init (smex-initialize) + :bind + ("M-x" . smex)) +#+end_src + +** Initialize =avy= + +*** Description +Go to char + +*** Code +#+begin_src emacs-lisp + (use-package avy + :ensure t + :bind + ("M-s" . avy-goto-char)) +#+end_src + +** Initialize =rainbow-mode= + +*** Description +Displays colour of a hex-code as background-colour behind said hex-code + +*** Code +#+begin_src emacs-lisp + (use-package rainbow-mode + :ensure t + :init + (add-hook 'css-mode-hook #'rainbow-mode 1)) +#+end_src |