.emacs look and feel

By Hal Canary, 2011-09-29 12:00:00 (link)

;_____________________________________________________________________
;
;    Look And Feel
;_____________________________________________________________________
(setq inhibit-startup-screen 't)
(tool-bar-mode nil)
(menu-bar-mode nil)
(set-scroll-bar-mode 'right)
(when window-system
  (add-to-list 'default-frame-alist '(background-color . "black"))
  (add-to-list 'default-frame-alist '(foreground-color . "white"))
  (add-to-list 'default-frame-alist '(background-mode . dark))
  (custom-set-faces '(default ((t
    (:height 110 :family "DejaVu Sans Mono"))))))

;_____________________________________________________________________
;
;    Keyboard Bindings
;_____________________________________________________________________
(setq x-select-enable-primary t)
(setq x-select-enable-clipboard t)
(cua-mode)
(global-unset-key (kbd "M-z"))
(global-set-key (kbd "M-z") 'suspend-emacs)
(global-set-key (kbd "C-h") 'backward-delete-char-untabify)
(global-set-key [(control s)] 'save-buffer)
(global-set-key [(control f)] 'isearch-forward)
(define-key isearch-mode-map [(control f)] 'isearch-repeat-forward)

(back)