X-Git-Url: https://code.delx.au/dotemacs/blobdiff_plain/bb478870e23a25fff8c80b2e4d21d7f2f66b5038..249425f19d406315b6e6166f5a8d15b2ee2ad801:/lisp/my-other-modes.el

diff --git a/lisp/my-other-modes.el b/lisp/my-other-modes.el
index 58848b6..fda7b98 100644
--- a/lisp/my-other-modes.el
+++ b/lisp/my-other-modes.el
@@ -1,9 +1,14 @@
+;;; -*- lexical-binding: t -*-
+
 (require 'autorevert)
 (global-auto-revert-mode 1)
 (setq global-auto-revert-non-file-buffers t)
 (setq auto-revert-verbose nil)
 
 (require 'dired-x)
+(require 'direx)
+(require 'direx-project)
+(defalias 'direx:find-item 'direx:find-item-other-window)
 
 (setq disabled-command-function nil)
 
@@ -14,10 +19,17 @@
             (unless (eq ibuffer-sorting-mode 'alphabetic)
               (ibuffer-do-sort-by-alphabetic))))
 
-(setq require-final-newline t)
+(require 'popwin)
+(popwin-mode 1)
+(push '(direx:direx-mode :position left :width 40 :dedicated t)
+      popwin:special-display-config)
+(push '("*git-gutter:diff*" :stick t)
+      popwin:special-display-config)
 
 (require 'restclient)
 
+(setq require-final-newline t)
+
 (setq save-interprogram-paste-before-kill t)
 
 (setq shift-select-mode nil)
@@ -26,5 +38,12 @@
 (require 'saveplace)
 (setq-default save-place t)
 
+(dolist (hook '(prog-mode-hook text-mode-hook))
+  (add-hook hook (lambda ()
+                   (setq show-trailing-whitespace t))))
+
+(setq undo-limit 10000000)
+(setq undo-strong-limit undo-limit)
+
 (require 'vc)
 (setq vc-follow-symlinks t)