From 4cf76b65c14060b60804ac119cbf91f779bc2e55 Mon Sep 17 00:00:00 2001 From: Tom Willemsen Date: Fri, 4 Jan 2013 00:00:37 +0100 Subject: [PATCH] Emacs: Stay true to 80 columns, even with lisp --- .emacs.d/init.el | 3 --- .emacs.d/site-lisp/oni.el | 5 ----- 2 files changed, 8 deletions(-) diff --git a/.emacs.d/init.el b/.emacs.d/init.el index f8c32bb..2b32682 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -273,7 +273,6 @@ (add-hook 'css-mode-hook 'oni:css-mode-func) (add-hook 'diary-display-hook 'oni:diary-display-func) (add-hook 'emacs-lisp-mode-hook 'oni:emacs-lisp-mode-func) -(add-hook 'emacs-lisp-mode-hook 'oni:generic-lisp-mode-hook) (add-hook 'erc-mode-hook 'oni:erc-mode-func) (add-hook 'eshell-mode-hook 'oni:eshell-mode-func) (add-hook 'flymake-mode-hook 'oni:flymake-mode-func) @@ -286,7 +285,6 @@ (add-hook 'java-mode-hook 'oni:java-mode-func) (add-hook 'js-mode-hook 'oni:js-mode-func) (add-hook 'js2-mode-hook 'oni:js2-mode-func) -(add-hook 'lisp-mode-hook 'oni:generic-lisp-mode-hook) (add-hook 'lua-mode-hook 'oni:lua-mode-func) (add-hook 'magit-log-edit-mode-hook 'oni:magit-log-edit-mode-func) (add-hook 'markdown-mode-hook 'oni:markdown-mode-func) @@ -296,7 +294,6 @@ (add-hook 'prog-mode-hook 'oni:prog-mode-func) (add-hook 'python-mode-hook 'oni:python-mode-func) (add-hook 'rst-mode-hook 'oni:rst-mode-func) -(add-hook 'scheme-mode-hook 'oni:generic-lisp-mode-hook) (add-hook 'term-mode-hook 'oni:term-mode-func) (add-hook 'texinfo-mode-hook 'oni:texinfo-mode-func) (add-hook 'write-file-hooks 'oni:write-file-func) diff --git a/.emacs.d/site-lisp/oni.el b/.emacs.d/site-lisp/oni.el index f461bab..79b5f6e 100644 --- a/.emacs.d/site-lisp/oni.el +++ b/.emacs.d/site-lisp/oni.el @@ -179,11 +179,6 @@ DOT are intentionally being skipped." (local-set-key [M-P] 'flymake-goto-prev-error) (local-set-key [M-N] 'flymake-goto-next-error)) -(defun oni:generic-lisp-mode-hook () - "Function for `emacs-lisp-mode-hook', `lisp-mode-hook' and -`scheme-mode-hook'." - (setq fci-rule-column 101)) - (defun oni:go-mode-func () "Function for `go-mode-hook'." (setq indent-tabs-mode nil)