blob: d0be2672d81483974b3bfe2e5bfa119ca2ce499d (
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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
;; General Configuration -*- lexical-binding: t -*-
(setopt frame-resize-pixelwise t
mac-right-command-modifier 'meta
mac-right-option-modifier 'none)
(when (executable-find "gls")
(setq insert-directory-program "gls"))
;; Org
(use-package org
:defer t
:custom (org-agenda-files '("~/Documents/ZK/TODO.org")))
(use-package org-roam
:defer t
:custom (org-roam-directory "~/Documents/ZK/"))
;; Server
(use-package server
:config
(defun my/server-start ()
(when (and (display-graphic-p) (not (server-running-p)))
(server-start)))
:hook (after-init . my/server-start))
;; Theme Management
(add-hook 'after-init-hook #'my/set-frame-themes)
;; “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))))
|
