From 1d67ae316f40a787d3c7005c66722a72768f8fe8 Mon Sep 17 00:00:00 2001
From: Collin Doering <rekahsoft@gmail.com>
Date: Sat, 9 Jul 2011 19:27:51 -0400
Subject: [PATCH] * Added a keybinding C-x O to cyvle backwards through buffers
 in a frame (opposite of C-x o) * Added for lispy like buffers converting
 lambda to the greek character of the same name * Modified some mc
 settings..its still the best for fs mgmt

---
 .emacs  | 27 +++++++++++++++++++++++++++
 .mc/ini |  4 ++--
 2 files changed, 29 insertions(+), 2 deletions(-)

diff --git a/.emacs b/.emacs
index cb0efd5..0584b48 100644
--- a/.emacs
+++ b/.emacs
@@ -11,6 +11,25 @@
 ;; bind M-g to M-x goto-line
 (global-set-key "\M-g" 'goto-line)
 
+;; Make C-x O cycle backwards a pane (oposite to C-x o)
+(global-set-key "\C-xO" #'(lambda ()
+			    (interactive)
+			    (other-window -1)))
+
+;; Thanks to lauren michelle for this one
+(defun pretty-lambdas ()
+  (font-lock-add-keywords
+   nil `(("(\\(lambda\\>\\)"
+	  (0 (progn (compose-region (match-beginning 1) (match-end 1)
+				    ,(make-char 'greek-iso8859-7 107))
+		    nil))))))
+
+;; Make lambda appear as the greek character
+(add-hook 'scheme-mode-hook 'pretty-lambdas)
+(add-hook 'lisp-mode-hook 'pretty-lambdas)
+(add-hook 'lisp-interaction-mode-hook 'pretty-lambdas)
+(add-hook 'geiser-repl-mode-hook 'pretty-lambdas)
+
 ;; adds the given function mode to each element of the given-hooks
 (defun activate-mode-with-hooks (mode given-hooks)
   (while given-hooks
@@ -136,6 +155,14 @@
 ;; Set default lisp program
 (setq inferior-lisp-program "/usr/bin/sbcl")
 
+;; Since there is no support for the kawa implementation of scheme
+(defun run-kawa ()
+  "Run Kawa Scheme in an Emacs buffer."
+  (interactive)
+  (require 'cmuscheme)
+  (let ((scheme-program-name "/usr/bin/kawa"))
+    (run-scheme scheme-program-name)))
+
 ;; Set usable lisp implementations
 (setq slime-lisp-implementations
       '((sbcl ("/usr/bin/sbcl" ""))
diff --git a/.mc/ini b/.mc/ini
index bf33ecb..36ed420 100644
--- a/.mc/ini
+++ b/.mc/ini
@@ -14,7 +14,7 @@ confirm_execute=0
 confirm_history_cleanup=1
 confirm_exit=1
 confirm_directory_hotlist_delete=1
-safe_delete=0
+safe_delete=1
 mouse_repeat_rate=100
 double_click_speed=250
 use_8th_bit_as_meta=0
@@ -24,7 +24,7 @@ mouse_close_dialog=0
 fast_refresh=0
 drop_menus=0
 wrap_mode=1
-old_esc_mode=0
+old_esc_mode=1
 old_esc_mode_timeout=1000000
 cd_symlinks=1
 show_all_if_ambiguous=0