path: root/config/init-ui.el

;;; init-ui.el --- User interface config. -*- lexical-binding: t -*-

;;; Commentary:

;; User interface settings.

;;; Code:

;; Don't say anything on mode-line mouseover.
(setq mode-line-default-help-echo nil)

;; Keep cursors and highlights in current window only.
(setq cursor-in-non-selected-windows nil)

;; Don't highlight inactive windows.
(setq highlight-nonselected-windows nil)

;; Use y-or-n
(setq use-short-answers t)

;; Use UTF-8 everywhere
(prefer-coding-system       'utf-8)
(set-default-coding-systems 'utf-8)
(set-terminal-coding-system 'utf-8)
(set-keyboard-coding-system 'utf-8)

(show-paren-mode 1)
(setq show-paren-delay 0)
(setq show-paren-highlight-openparen t)
(setq show-paren-when-point-inside-paren t)
(setq show-paren-when-point-in-periphery t)

(require 'fringe)
;; no fringe on the right side
(set-fringe-mode '(8 . 0))

;; Disable bidirectional text support for slight performance bonus.
(setq bidi-display-reordering nil)

(setq window-divider-default-bottom-width 1)
(setq window-divider-default-places 'bottom-only)

;; empty scratch buffer
(setq initial-scratch-message "")

;; scroll 5 lines at a time
(setq next-screen-context-lines 5)

;; cursor is a horizontal bar
(setq cursor-type 'box)

(provide 'init-ui)
;;; init-ui.el ends here