.emacs-my
changeset 1552 da98a7d4c704
parent 1550 e3a381f14ad1
child 1553 760837fd2f5e
equal deleted inserted replaced
1551:e03dcbea6a1f 1552:da98a7d4c704
  2547                  ((equal prefix '(16))
  2547                  ((equal prefix '(16))
  2548                   (vc-diff-internal t (list 'Hg (list rootdir)) "qparent" nil)) ))))
  2548                   (vc-diff-internal t (list 'Hg (list rootdir)) "qparent" nil)) ))))
  2549     (call-interactively 'vc-root-diff nil) ))
  2549     (call-interactively 'vc-root-diff nil) ))
  2550 
  2550 
  2551 (global-set-key (kbd "C-x v D") 'my-vc-root-diff)
  2551 (global-set-key (kbd "C-x v D") 'my-vc-root-diff)
       
  2552 
       
  2553 (setq vc-hg-diff-switches (list "-U" "7"))
       
  2554 (setq vc-git-diff-switches (list "-U7"))
  2552 
  2555 
  2553 (when window-system
  2556 (when window-system
  2554   (setq
  2557   (setq
  2555    vc-annotate-very-old-color "#0b5b20"
  2558    vc-annotate-very-old-color "#0b5b20"
  2556    vc-annotate-background "white"
  2559    vc-annotate-background "white"