blob: c400d54412be2ceec93b3c8b2364267679305935 (
plain)
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
|
;; General Configuration
(setopt mac-right-command-modifier 'meta
mac-right-option-modifier 'none)
(when (executable-find "gls")
(setq insert-directory-program "gls"))
;; Theme Management
(when (or window-system (daemonp))
(my/with-add-hook 'after-init-hook
(when my/day-theme (load-theme my/day-theme :no-confirm :no-enable))
(when my/night-theme (load-theme my/night-theme :no-confirm :no-enable))
(run-at-time nil (* 15 60) #'my/maybe-switch-theme my/day-theme
my/night-theme #'my/macos-dark-p)))
;; “Window” Management
(keymap-global-set "C-c l" #'my/resize-frame)
(dolist (k '(("C-s-<left>" . "C-c l i") ("C-s-<right>" . "C-c l o")))
(if (keymap-global-lookup (car k))
(message "`%s' is already bound, skipping." (car k))
(keymap-global-set (car k) (cdr k))))
|
