| 1 | ;; -*- lexical-binding: t; -*- |
| 2 | (fido-vertical-mode 1) |
| 3 | (show-paren-mode 1) |
| 4 | (electric-pair-mode 1) |
| 5 | (global-auto-revert-mode 1) |
| 6 | (save-place-mode 1) |
| 7 | (menu-bar-mode -1) |
| 8 | (tool-bar-mode -1) |
| 9 | (scroll-bar-mode -1) |
| 10 | (setq inhibit-startup-screen t |
| 11 | inhibit-startup-echo-area-message user-login-name) |
| 12 | |
| 13 | (global-display-line-numbers-mode t) |
| 14 | (column-number-mode t) |
| 15 | |
| 16 | (load-theme 'gruber-darker t) |
| 17 | (setq make-backup-files nil |
| 18 | auto-save-default nil |
| 19 | create-lockfiles nil) |
| 20 | |
| 21 | (setopt use-short-answers t) |
| 22 | (setq-default indent-tabs-mode t tab-width 2) |
| 23 | |
| 24 | (with-eval-after-load 'org |
| 25 | (setq org-startup-folded t |
| 26 | org-hide-emphasis-markers t |
| 27 | org-ellipsis " ▾")) |
| 28 | |
| 29 | (set-face-attribute 'default nil |
| 30 | :family "Iosevka Nerd Font Mono" |
| 31 | :weight 'bold |
| 32 | :height 180) |
| 33 | |
| 34 | (defvar my-term-shell "/bin/oksh") |
| 35 | (defadvice ansi-term (before force-oksh) |
| 36 | (interactive (list my-term-shell))) |
| 37 | (ad-activate 'ansi-term) |
| 38 | |
| 39 | |
| 40 | (eval-after-load "term" |
| 41 | '(define-key term-raw-map (kbd "C-c v") 'term-paste)) |
| 42 | |
| 43 | |
| 44 | (defadvice term-sentinel (around my-advice-term-sentinel (proc msg)) |
| 45 | (if (memq (process-status proc) '(signal exit)) |
| 46 | (let ((buffer (process-buffer proc))) |
| 47 | ad-do-it |
| 48 | (kill-buffer buffer)) |
| 49 | ad-do-it)) |
| 50 | (ad-activate 'term-sentinel) |