Browse Source

.emacs

set default executable for run-haskell
.stumpwmrc
  added a few keybindings mainly relating to window groups
.xmonad/xmonad.hs
  added a few more workspaces and logical keys to bind them to

Signed-off-by: Collin Doering <rekahsoft@gmail.com>
master
Collin J. Doering 10 years ago
committed by Collin J. Doering
parent
commit
d4bc512e30
3 changed files with 9 additions and 4 deletions
  1. +3
    -0
      .emacs
  2. +4
    -2
      .stumpwmrc
  3. +2
    -2
      .xmonad/xmonad.hs

+ 3
- 0
.emacs View File

@ -215,6 +215,9 @@
;;(add-hook 'haskell-mode-hook 'turn-on-haskell-indent)
;;(add-hook 'haskell-mode-hook 'turn-on-haskell-simple-indent)
;; Set inferior haskell default executable
(setq haskell-program-name "/usr/bin/ghci")
;; Setup emacs-python-mode
(autoload 'python-mode "/usr/share/emacs/site-lisp/python-mode.el" "Python mode." t)
(setq auto-mode-alist (append '(("/*.\.py$" . python-mode)) auto-mode-alist))


+ 4
- 2
.stumpwmrc View File

@ -34,11 +34,13 @@
(stumpwm:undefine-key stumpwm:*root-map* (stumpwm:kbd "C-e"))
;; Create some keybindings to make life easier
(stumpwm:define-key stumpwm:*root-map* (stumpwm:kbd "N") "gnext")
(stumpwm:define-key stumpwm:*root-map* (stumpwm:kbd "P") "gprev")
(stumpwm:define-key stumpwm:*root-map* (stumpwm:kbd ">") "gnext")
(stumpwm:define-key stumpwm:*root-map* (stumpwm:kbd "<") "gprev")
(stumpwm:define-key stumpwm:*root-map* (stumpwm:kbd "d") "gkill")
(stumpwm:define-key stumpwm:*root-map* (stumpwm:kbd "N") "gnew")
(stumpwm:define-key stumpwm:*root-map* (stumpwm:kbd "c") "exec urxvt")
(stumpwm:define-key stumpwm:*root-map* (stumpwm:kbd "C-e") "exec emacsclient -c")
(stumpwm:define-key stumpwm:*root-map* (stumpwm:kbd "P") "exec dmenu_run")
;; Load swank for emacs to connect to stumpwm's lisp process
(load "/usr/share/emacs/site-lisp/slime/swank-loader.lisp")


+ 2
- 2
.xmonad/xmonad.hs View File

@ -96,7 +96,7 @@ myModMask = mod4Mask
--
-- > workspaces = ["web", "irc", "code" ] ++ map show [4..9]
--
myWorkspaces = ["1:general","2:hack","3:code","4:prog","5:web","6:com","7:net","8:media","9:status","0:mail","esc:hide"]
myWorkspaces = ["1:general","2:hack","3:code","4:prog","5:web","6:com","7:net","8:media","9:status","0:mail","esc:hide","-:11","=:12","\\:13", "`:14"]
-- Border colors for unfocused and focused windows, respectively.
--
@ -188,7 +188,7 @@ myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList $
-- mod-shift-[1..9], Move client to workspace N
--
[((m .|. modm, k), windows $ f i)
| (i, k) <- zip (XMonad.workspaces conf) ([xK_1 .. xK_9] ++ [xK_0, xK_Escape])
| (i, k) <- zip (XMonad.workspaces conf) ([xK_1 .. xK_9] ++ [xK_0, xK_Escape, xK_minus, xK_equal, xK_backslash, xK_grave])
, (f, m) <- [(W.greedyView, 0), (W.shift, shiftMask)]]
-- Add custom key bindings


Loading…
Cancel
Save