-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathmy-layout-and-theme.el
43 lines (33 loc) · 1.2 KB
/
my-layout-and-theme.el
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
;; Set initial layout
(if (string= system-name "justin-linux-mint")
(setq default-frame-alist
'((width . 151) (height . 90)))
(setq default-frame-alist
'((width . 101) (height . 90))))
(fringe-mode (cons 8 4))
;; turn on line numbers
(global-linum-mode t)
;; Load a custom theme
;;(load-theme 'sanityinc-tomorrow-eighties t)
;; Change theme based on time of day
(defun synchronize-theme ()
(setq hour
(string-to-number
(substring (current-time-string) 11 13)))
(if (member hour (number-sequence 6 17))
(load-theme 'zenburn t)
(load-theme 'sanityinc-tomorrow-eighties t))
)
(run-with-timer 0 3600 'synchronize-theme)
;; Set text to 12pt except on jet which has a lower resolution
(if (string= system-name "jet")
(set-face-attribute 'default nil :height 100)
(set-face-attribute 'default nil :height 120))
;; Set whitespace long line to really far off
(setq whitespace-line-column 250)
;; Change the newline-mark 'paragraph mark' to the paragraph symbol
(setq whitespace-display-mappings '((newline-mark 10 [182 10])))
;; Make C-n add newlines so I don't have to hit enter at the end of a
;; buffer
(setq next-line-add-newlines t)
(provide 'my-layout-and-theme)