handle M-SPC correctly

set mail-user-agent and read-mail-command

git-svn-id: file:///svn/tfheen/trunk/dotfiles@165 8da78d58-1cd3-0310-bee5-d77bd1b3e8bf

diff --git a/emacs b/emacs
index 668b9405724029f39264b62f610ac46d840ac20c..860396d71cb8de691742981b90cd932c8e944338 100644 (file)
--- a/emacs
+++ b/emacs
@@ -1,18 +1,9 @@
 ; -*- emacs-lisp -*-
 ;
 
-(message "checking for local setup and loading..")
-(if (file-exists-p "/local/skel/all.emacs")
-    (load "/local/skel/all.emacs" nil t t))
-
 (message "loading .emacs-standard")
 (load "~/.emacs-standard")
 
-(cw/requiring-forms nil 
-  (message "checking for local setup and loading..")
-  (if (file-exists-p "/local/skel/all.emacs")
-      (load "/local/skel/all.emacs" nil t t)))
-
 (setq tfheen-color-preference 'light) ; light or dark
 
 (cw/for-emacs
@@ -44,7 +35,6 @@
       read-mail-command 'gnus)
 
 (add-hook 'text-mode-hook 'turn-on-auto-fill)
-(add-hook 'debian-changelog-mode-hook 'turn-on-auto-fill)
 
 (fset 'yes-or-no-p 'y-or-n-p)
 
@@ -65,7 +55,7 @@
 (global-set-key "\M-n" 'browse-url-at-point)
 (global-set-key (kbd "C-x C-c")
 #'(lambda () (interactive)
-    (if (and window-system (string-match "yiwaz" system-name))
+    (if window-system
         (message "you must be kidding")
       (save-buffers-kill-emacs))))
 
@@ -205,15 +195,8 @@
  (global-set-key [end] 'end-of-buffer)
  (setq cursor-in-non-selected-windows nil))
 
-(defun tfheen-complete (&optional x)
-  (interactive)
-  (if (eq major-mode 'jde-mode)
-      (jde-complete-at-point)
-    (hippie-expand x)))
-
 (global-set-key [C-tab] 'dabbrev-expand)
-(global-set-key "\M- " 'tfheen-complete)
-
+(global-set-key [M-space] '(lambda() (insert " ")))
 
 ;(add-hook 'diary-hook 'appt-make-list)
 ;(add-hook 'diary-hook 'appt-make-list)