(defun ecb-layout-alexdefault ()
 "switch to alexdefault"
 (interactive)
 (ecb-layout-switch "alexdefault")
 )

(defun ecb-layout-alexTopHistorySourcesMethods ()
 "switch to alexTopHistorySourcesMethods"
 (interactive)
 (ecb-layout-switch "alexTopHistorySourcesMethods")
 )

(define-key global-map  "\C-c0"         'ecb-layout-alexdefault)
(define-key global-map  "\C-c9"         'ecb-layout-alexTopHistorySourcesMethods)

(define-key global-map  "\C-ca"         'ecb-activate)
(define-key global-map  "\C-cb"         'ecb-toggle-ecb-windows)
(add-to-list 'load-path "/usr/share/emacs/site-lisp/ecb")

(add-to-list 'load-path "/usr/share/emacs/site-lisp/ecb")
(require 'ecb)

(custom-set-variables)
(custom-set-faces
 '(ecb-tag-header-face ((((class color) (background dark)) (:background "SeaGreen1" :foreground "black"))))
 '(ecb-source-face ((((class color) (background dark)) (:inherit ecb-default-highlight-face :background "DeepSkyBlue" :foreground "white"))))
 '(ecb-default-highlight-face ((((class color) (background dark)) (:background "DarkSlateBlue" :foreground "white"))))
 '(ecb-analyse-face ((((class color) (background dark)) (:inherit ecb-default-highlight-face :background "DarkSlateBlue" :foreground "white")))))