.emacs


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70

(custom-set-variables
 ;; custom-set-variables was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(custom-enabled-themes '(moe-dark))
 '(custom-safe-themes
   '("a68624bd5c4bec879ee59cd3039531b6229766a8b8ed0e79eef2642f14dbda32" "58c996beb973f7e988ee4fd21c367b7a5bbdb0622ddfbbd112672a7b4e3d3b81" default))
 '(initial-buffer-choice t)
 '(package-selected-packages '(elpher moe-theme org visual-fill-column)))
(custom-set-faces
 ;; custom-set-faces was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 )


;; Setup modes
;;; remember layout
;;(desktop-save-mode 1)
;;; disable menu bar
;;(menu-bar-mode -1)
(tool-bar-mode -1)
(scroll-bar-mode -1)
;;; disable emacs splash screen
(setq inhibit-startup-screen t)
;; Mode hooks
;;; show line numbers
;;; (global-display-line-numbers) ; we can set this if we find we want it for all buffers
(add-hook 'prog-mode-hook (lambda () (display-line-numbers-mode)
			    (visual-line-mode)
			    (visual-fill-column-mode)))
(add-hook 'text-mode-hook (lambda () (display-line-numbers-mode)
			    (visual-line-mode)
			    (visual-fill-column-mode)))

;; Idiomdrottning and bad-emacs-defaults fixes
(global-set-key [(control h)] 'delete-backward-char)
(keyboard-translate ?\C-h ?\C-?)
(make-directory "~/.emacs.d/backups/" t)
(make-directory "~/.emacs.d/autosave/" t)
(setq auto-save-file-name-transforms '((".*" "~/.emacs.d/autosave/" t)))
(setq backup-directory-alist '(("." . "~/.emacs.d/backups/")))
(setq sentence-end-double-space nil)

;; follow symlinks
(setq vc-follow-symlinks nil)

;; Custom mode prefixes
;;; set gemini to markdown mode for now
(add-to-list 'auto-mode-alist '("\\.gmi\\'" . markdown-mode))

;; theme customization
(require 'moe-theme)
(setq moe-theme-mode-line-color 'cyan)
(moe-dark)
(defun use-light-theme () "Set theme to light"
       (interactive)
       (moe-light))
(defun use-dark-theme () "Set theme to dark"
       (interactive)
       (moe-dark))

(global-set-key "\C-cl" 'use-light-theme)
(global-set-key "\C-cd" 'use-dark-theme)

;; Always last
;;(when (file-exists-p "~/.emacs.d/pc_local_init.el")
;;  (load "~/.emacs.d/pc_local_init.el"))`