aboutsummaryrefslogtreecommitdiff
path: root/gui/conf
diff options
context:
space:
mode:
Diffstat (limited to 'gui/conf')
-rw-r--r--gui/conf/init.el3
-rw-r--r--gui/conf/xmonad.hs8
2 files changed, 9 insertions, 2 deletions
diff --git a/gui/conf/init.el b/gui/conf/init.el
index fc16d5d..32453b8 100644
--- a/gui/conf/init.el
+++ b/gui/conf/init.el
@@ -1,3 +1,6 @@
+(setq inhibit-startup-message t)
+(setq initial-scratch-message nil)
+
(setq backup-directory-alist `(("." . "~/.emacs.d/backup")))
(require 'package)
diff --git a/gui/conf/xmonad.hs b/gui/conf/xmonad.hs
index a7167c0..5038f48 100644
--- a/gui/conf/xmonad.hs
+++ b/gui/conf/xmonad.hs
@@ -117,7 +117,10 @@ scratchpads host =
, NS "calculator" "speedcrunch" (className =? "SpeedCrunch")
(customFloating $ hideScreenBorder host sideBarLeft)
, NS "messaging" "telegram-desktop" ((className =? "TelegramDesktop") <&&> (title /=? "Media viewer"))
- (customFloating $ hideScreenBorder host sideBarRight) ]
+ (customFloating $ hideScreenBorder host sideBarRight)
+ , NS "notes" "emacs --title=notemacs ~/org/org.org" (title =? "notemacs")
+ (customFloating $ hideScreenBorder host dropDownLarge)
+ ]
hudMonitor host = monitor
{ prop = Title "hud"
@@ -198,7 +201,8 @@ commonKeybindings host =
, ("M-t" , namedScratchpadAction (scratchpads host) "thesaurus")
, ("M-z" , namedScratchpadAction (scratchpads host) "literature")
, ("M-r" , namedScratchpadAction (scratchpads host) "calculator")
- , ("M-m" , namedScratchpadAction (scratchpads host) "messaging") ] ++
+ , ("M-m" , namedScratchpadAction (scratchpads host) "messaging")
+ , ("M-n" , namedScratchpadAction (scratchpads host) "notes") ] ++
-- workspace selection
[ (p ++ [k] , windows $ f i) | (i, k) <- zip Main.workspaces ['1' .. '9']