code.delx.au - dotemacs/blob - lisp/my-other-modes.el

   1 ;;; -*- lexical-binding: t -*-
   2
   3 (require 'autorevert)
   4 (global-auto-revert-mode 1)
   5 (setq global-auto-revert-non-file-buffers t)
   6 (setq auto-revert-verbose nil)
   7
   8 (require 'direx)
   9 (require 'direx-project)
  10
  11 (setq disabled-command-function nil)
  12
  13 (require 'ibuffer-vc)
  14 (add-hook 'ibuffer-hook
  15           (lambda ()
  16             (ibuffer-vc-set-filter-groups-by-vc-root)
  17             (unless (eq ibuffer-sorting-mode 'alphabetic)
  18               (ibuffer-do-sort-by-alphabetic))))
  19
  20 (require 'popwin)
  21 (popwin-mode 1)
  22 (push '(direx:direx-mode :position left :width 40 :dedicated t)
  23       popwin:special-display-config)
  24 (push '("*git-gutter:diff*" :stick t)
  25       popwin:special-display-config)
  26
  27 (require 'restclient)
  28
  29 (setq require-final-newline t)
  30
  31 (setq save-interprogram-paste-before-kill t)
  32
  33 (setq shift-select-mode nil)
  34 (delete-selection-mode t)
  35
  36 (require 'saveplace)
  37 (setq-default save-place t)
  38
  39 (dolist (hook '(prog-mode-hook text-mode-hook))
  40   (add-hook hook (lambda ()
  41                    (setq show-trailing-whitespace t))))
  42
  43 (setq undo-limit 10000000)
  44 (setq undo-strong-limit undo-limit)
  45
  46 (require 'vc)
  47 (setq vc-follow-symlinks t)