;;; Personal Init
;;; Code

(define-key key-translation-map [dead-grave] "`")
(define-key key-translation-map [dead-acute] "'")
(define-key key-translation-map [dead-circumflex] "^")
(define-key key-translation-map [dead-diaeresis] "\"")
(define-key key-translation-map [dead-tilde] "~")

(global-set-key (kbd "<C-up>") 'shrink-window)
(global-set-key (kbd "<C-down>") 'enlarge-window)
(global-set-key (kbd "<C-left>") 'shrink-window-horizontally)
(global-set-key (kbd "<C-right>") 'enlarge-window-horizontally)

(setq linum-format "%4d \u2502 ")
(global-linum-mode t)
(set-face-background 'region "gray80")
(setq scroll-preserve-screen-position t)
(setq-default indent-tabs-mode nil)
(show-paren-mode 1)
(setq blink-matching-paren-distance nil)
(setq show-paren-style 'expression)
(column-number-mode t)
(electric-pair-mode 1)
(transient-mark-mode 1)
(delete-selection-mode 1)
(setq make-backup-files nil)
(setq auto-save-default nil)
(recentf-mode 1)
;(desktop-save-mode 1)
;(tabbar-mode)
(global-hl-line-mode 1)
(global-visual-line-mode 1)
(setq pop-up-frames nil) ; t for true, nil for false
(setq-default indent-tabs-mode nil)
(setq-default tab-width 4)
(setq indent-line-function 'insert-tab)
(setq cua-enable-cua-keys nil)
(setq cua-highlight-region-shift-only t) ;; no transient mark mode
(setq cua-toggle-set-mark nil) ;; original set-mark behavior, i.e. no transient-mark-mode
(cua-mode)
(scroll-lock-mode 1)
(global-set-key [M-right] 'next-buffer)
(global-set-key [M-left] 'previous-buffer)
(set-face-background 'hl-line "#088")

(provide 'init)
;; init.el ends here