-(load-theme 'deeper-blue)
+;;; -*- lexical-binding: t -*-
(menu-bar-mode -1)
(tool-bar-mode -1)
(scroll-bar-mode -1)
+(require 'pastels-on-dark-theme)
+(setq frame-background-mode 'dark)
+
+(setq default-frame-alist '((vertical-scroll-bars)
+ (background-mode . dark)
+ (alpha . 95)
+ (font . "monospace 12")))
+
+(require 'ansi-color)
+(setq ansi-color-names-vector
+ '("#000000"
+ "#fc391f"
+ "#31e722"
+ "#eaec23"
+ "#4856f7"
+ "#f935f8"
+ "#14f0f0"
+ "#e9ebeb"))
+(setq ansi-color-map (ansi-color-make-color-map))
+
+(add-to-list 'term-file-aliases
+ '("screen.xterm-256color" . "screen-256color"))
+
(setq scroll-conservatively 1)
(setq scroll-margin 1)
(setq mouse-wheel-scroll-amount '(3))
(show-paren-mode t)
-(setq show-trailing-whitespace t)
+(dolist (hook '(prog-mode-hook text-mode-hook))
+ (add-hook hook (lambda ()
+ (setq show-trailing-whitespace t))))
+
+(setq shift-select-mode nil)
+(delete-selection-mode t)
+(setq sentence-end-double-space nil)
(require 'uniquify)
(setq uniquify-strip-common-suffix t)
(setq uniquify-buffer-name-style 'post-forward)
-(setq frame-title-format
- '((:eval (if (buffer-file-name)
- (concat
- (file-name-nondirectory (buffer-file-name))
- (if (buffer-modified-p)
- " +")
- " ("
- (abbreviate-file-name (substring (file-name-directory (buffer-file-name)) 0 -1))
- ") - Emacs"
- )
- (concat
- "%b"
- (if (buffer-modified-p)
- " +")
- " - Emacs")))))
-(setq icon-title-format frame-title-format)
+(defalias 'yes-or-no-p 'y-or-n-p)
+
+(setq find-file-visit-truename t)
+
+(setq disabled-command-function nil)
+
+(setq save-interprogram-paste-before-kill t)
+
+(setq undo-limit 10000000)
+(setq undo-strong-limit undo-limit)