diff options
Diffstat (limited to 'gui/conf')
-rw-r--r-- | gui/conf/init.el | 3 | ||||
-rw-r--r-- | gui/conf/xmonad.hs | 8 |
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'] |