| 123456789101112131415161718192021222324252627282930 |
- ;;;; This file contains settings regarding Emacs' appearance.
- ;; Disable startup screen
- (setq inhibit-startup-screen t)
- ;; Visual bell
- (setq ring-bell-function (lambda ()
- (invert-face 'mode-line)
- (run-with-timer 0.05 nil 'invert-face 'mode-line)))
- ;; Show matching parentheses
- (show-paren-mode t)
- ;; Cursor blinking off
- (blink-cursor-mode -1)
- ;; Highlight the current line
- (global-hl-line-mode)
- ;; Display line numbers, relative line numbers
- (global-display-line-numbers-mode t)
- (setq display-line-numbers-type 'relative)
-
- ;; Font
- (let* ((windows-system (or (eq system-type 'ms-dos) (eq system-type 'windows-nt) (eq system-type 'cygwin)))
- (posix-system (not windows-system)))
- (cond
- (posix-system (set-face-attribute 'default nil :family "Liberation Mono" :height 150))
- (windows-system (set-face-attribute 'default nil :family "Consolas" :height 150))))
|
