refactoring old cruft

[.emacs.d.git] / emacs / my-generic-stuff.el

diff --git a/emacs/my-generic-stuff.el b/emacs/my-generic-stuff.el
index e6b5beea4e7cb38c592464c57ea2c4b534340925..e989e6fe5ad73df639ee0fcad9db3f94f6cd1a58 100644 (file)
--- a/emacs/my-generic-stuff.el
+++ b/emacs/my-generic-stuff.el
@@ -42,3 +42,43 @@
 
 ;; font lock
 (global-font-lock-mode t)
+
+;; which-function mode
+(setq-default indent-tabs-mode nil)
+(add-hook 'emacs-lisp-mode-hook
+         (lambda () (which-function-mode t)))
+
+;; iswitch
+(iswitchb-mode 1)
+
+;; smooth scroll
+(setq scroll-conservatively 1)
+(put 'upcase-region 'disabled nil)
+(put 'downcase-region 'disabled nil)
+
+;; cut and paste with the rest of ecosystem in X
+(setq x-select-enable-clipboard t)
+
+;; remove toolbar
+(if (> emacs-major-version 20)
+    (tool-bar-mode -1))
+
+;; completions enhancements
+(icomplete-mode t)
+
+;; Interactively Do Things mode
+(require 'ido)
+(ido-mode t)
+(setq ido-enable-flex-matching t)
+(setq ido-enable-last-directory-history nil)
+
+;; browse kill ring
+(when (require 'browse-kill-ring nil 'noerror)
+  (browse-kill-ring-default-keybindings))
+
+;;; displays "\" at the end of lines that wrap
+(setq longlines-show-hard-newlines t)
+
+;; cursor
+(setq-default cursor-type '(bar . 2))
+(set-cursor-color "#ff0000")