(not (memq 'git vc-handled-backends))
(setq vc-handled-backends (cons 'GIT vc-handled-backends)))
+(setq magit-log-cutoff-length 512)
+
(trap (or mdw-fast-startup (require 'p4)))
(trap (or mdw-fast-startup (require 'tex-site)))
(setq interpreter-mode-alist
(append `(("runlisp" . lisp-mode)
+ ("@BASH" . sh-mode)
("@PYTHON@" . python-mode)
("@PERL@" . perl-mode)
("@TCLSH@" . tcl-mode)