aboutsummaryrefslogtreecommitdiff
path: root/gui/conf
diff options
context:
space:
mode:
Diffstat (limited to 'gui/conf')
-rw-r--r--gui/conf/init.el37
-rw-r--r--gui/conf/xmonad.hs6
2 files changed, 40 insertions, 3 deletions
diff --git a/gui/conf/init.el b/gui/conf/init.el
new file mode 100644
index 0000000..27d5f8f
--- /dev/null
+++ b/gui/conf/init.el
@@ -0,0 +1,37 @@
+(setq inhibit-startup-message t)
+(setq initial-scratch-message nil)
+
+(setq backup-directory-alist `(("." . "~/.emacs.d/backup")))
+
+(require 'package)
+(package-initialize)
+(eval-when-compile (require 'use-package))
+
+(load-theme 'leuven)
+(set-frame-font "Iosevka 11" nil t)
+(menu-bar-mode -1)
+(toggle-scroll-bar -1)
+(tool-bar-mode -1)
+(global-visual-line-mode t)
+
+(use-package org)
+
+(setq org-agenda-files (list "~/org/org.org"))
+
+(use-package evil)
+(use-package evil-leader)
+(use-package evil-org)
+
+(global-evil-leader-mode)
+(evil-leader/set-leader ",")
+(evil-mode 1)
+
+(add-hook 'org-mode-hook 'evil-org-mode)
+(evil-org-set-key-theme '(navigation insert textobjects additional todo))
+
+(setq org-fontify-whole-heading-line t)
+(setq org-adapt-indentation nil)
+
+(evil-define-key 'normal org-mode-map
+ "J" 'org-next-visible-heading
+ "K" 'org-previous-visible-heading)
diff --git a/gui/conf/xmonad.hs b/gui/conf/xmonad.hs
index 31fb636..f5e8893 100644
--- a/gui/conf/xmonad.hs
+++ b/gui/conf/xmonad.hs
@@ -118,8 +118,8 @@ scratchpads host =
(customFloating $ hideScreenBorder host sideBarLeft)
, NS "messaging" "telegram-desktop" ((className =? "TelegramDesktop") <&&> (title /=? "Media viewer"))
(customFloating $ hideScreenBorder host sideBarRight)
- , NS "scratch" "kitty --class=scratch" (className =? "scratch")
- (customFloating $ hideScreenBorder host dropDown)
+ , NS "notes" "emacs --title=notemacs ~/org/org.org" (title =? "notemacs")
+ (customFloating $ hideScreenBorder host dropDownLarge)
]
hudMonitor host = monitor
@@ -205,7 +205,7 @@ commonKeybindings host =
, ("M-z" , namedScratchpadAction (scratchpads host) "literature")
, ("M-r" , namedScratchpadAction (scratchpads host) "calculator")
, ("M-m" , namedScratchpadAction (scratchpads host) "messaging")
- , ("M-n" , namedScratchpadAction (scratchpads host) "scratch") ] ++
+ , ("M-n" , namedScratchpadAction (scratchpads host) "notes") ] ++
-- workspace selection
[ (p ++ [k] , windows $ f i) | (i, k) <- zip Main.workspaces ['1' .. '9']