From 9bf3be9eb71fb2464287c7378b58d67d7623f3ba Mon Sep 17 00:00:00 2001 From: tfheen Date: Sat, 26 Apr 2003 11:34:34 +0000 Subject: [PATCH] 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 --- emacs | 21 ++------------------- 1 file changed, 2 insertions(+), 19 deletions(-) diff --git a/emacs b/emacs index 668b940..860396d 100644 --- 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) -- 2.39.5