'(("en_GB-ize-w_accents" "[[:alpha:]]" "[^[:alpha:]]" "'" t
("-d" "en_GB-ize-w_accents") nil utf-8))
ispell-silently-savep t)
+(setq-default viper-case-fold-search t
+ viper-electric-mode t
+ viper-ex-style-motion nil
+ viper-ex-style-editing nil
+ viper-expert-level 5
+ viper-inhibit-startup-message t
+ ;;viper-insert-state-cursor-color "red"
+ viper-no-multiple-ESC nil
+ viper-re-query-replace t
+ viper-re-search t
+ ;;viper-replace-overlay-cursor-color "red"
+ viper-shift-width 2
+ viper-vi-style-in-minibuffer nil
+ viper-want-ctl-h-help t)
(trap
(require 'uniquify)
(setq uniquify-buffer-name-style 'post-forward-angle-brackets)
(tool-bar-mode 0))
(trap (or mdw-fast-startup (global-auto-revert-mode t)))
+(defun mdw-set-viper-cursor-colour ()
+ ;; ?? doesn't seem to work
+ (set-frame-parameter nil 'cursor-color "green")
+ (message ";; %S" post-command-hook)
+ (sit-for 2))
+;;(add-hook 'viper-vi-state-hook 'mdw-set-viper-cursor-colour)
+
(defvar mdw-black-background t)
(eval-after-load "outline"