stumpwm

[dotemacs] / lisp / my-file-modes.el

diff --git a/lisp/my-file-modes.el b/lisp/my-file-modes.el
index 135d69f52761f45faecf4ca2178c8986a2a6ed27..a819d08d83609733e7b89aa8affa878302bf4b5a 100644 (file)
--- a/lisp/my-file-modes.el
+++ b/lisp/my-file-modes.el
@@ -53,6 +53,14 @@
 (require 'scala-mode)
 
 (require 'slime)
-(setq inferior-lisp-program "clisp")
+(setq inferior-lisp-program "sbcl")
+
+(when (require 'stumpwm-mode nil 'noerror)
+  (add-hook 'find-file-hook
+            (lambda ()
+              (when (string=
+                     ".stumpwmrc"
+                     (file-name-nondirectory (buffer-file-name)))
+                (stumpwm-mode)))))
 
 (require 'yaml-mode)