(and (library-exists-p "vc-git")
(not (memq 'GIT vc-handled-backends))
+ (not (memq 'Git vc-handled-backends))
+ (not (memq 'git vc-handled-backends))
(setq vc-handled-backends (cons 'GIT vc-handled-backends)))
-(and (library-exists-p "quilt")
- (not mdw-fast-startup)
- (load "quilt"))
(trap (or mdw-fast-startup (require 'p4)))
(scroll-bar-width . 15)
(cursor-color . "red"))
(if mdw-black-background
- '((background-color . "black")
- (foreground-color . "white")
- (background-mode . dark))
+ '((background-mode . dark))
'((background-mode . light)))
(and (eq window-system 'pm)
'((font . "-os2-System VIO-medium-r-normal--*-40-*-*-m-*-cp850")
(menu-font . "8.Helv")
(background-color . "lightgrey")))
- '((transparency . t))
default-frame-alist))
;; Other frame fiddling.
(tramp-copy-program nil)
(tramp-copy-args nil)
(tramp-copy-keep-date-arg nil)
- (tramp-login-args ("TERM=dumb" "%u")))
+ (tramp-login-args (("TERM=dumb" "%u"))))
("really"
(tramp-connection-function tramp-open-connection-su)
(tramp-login-program "really")
- (tramp-login-args ("-u" "%u" "--"
- "env" "TERM=dumb" "/bin/sh"))
+ (tramp-login-args (("-u" "%u")
+ ("--")
+ ("env" "TERM=dumb" "/bin/sh")))
(tramp-copy-program nil)
(tramp-copy-args nil)
(tramp-copy-keep-date-arg nil)