;; add my paths to load-path
(add-to-list 'load-path "~/.emacs.d/session")
(add-to-list 'load-path "~/.emacs.d/lisp")

;; setup fontset
(if window-system
    (progn
      ;; font setting
      (set-frame-font "Bitstream Vera Sans Mono-9")
      (add-to-list 'default-frame-alist '(font . "Bitstream Vera Sans Mono-9"))
      (set-fontset-font (frame-parameter nil 'font)
			'han '("Microsoft YaHei" . "unicode-bmp"))

      ;; Window Positioninga
      (setq default-frame-alist '((top . 0) (left . 0)
				  (width . 156) (height . 38)))))

;; setup show startup message
(setq inhibit-startup-message t)

(require 'site-gentoo)

;;(setq-default make-backup-files nil)

;; load cedet, semantic and ecb
(setq ecb-auto-activate t)
(setq ecb-tip-of-the-day nil)
(setq semantic-load-turn-useful-things-on t)
(require 'cedet)
(require 'ecb)
(semantic-load-enable-code-helpers)
(require 'semantic-ia)
(global-set-key [(control p)] 'semantic-ia-complete-symbol-menu)
(global-semantic-show-unmatched-syntax-mode -1)
(require 'ede)
(global-ede-mode t)

;; c & c++
(semantic-add-system-include "/usr/include" 'c-mode)
(semantic-add-system-include "/usr/include" 'c++-mode)

;; qt4
(setq qt4-base-dir "/usr/include/qt4")
(setq qt4-gui-dir (concat qt4-base-dir "/QtGui"))
(semantic-add-system-include qt4-base-dir 'c++-mode)
(semantic-add-system-include qt4-gui-dir 'c++-mode)
(add-to-list 'auto-mode-alist (cons qt4-base-dir 'c++-mode))
(add-to-list 'semantic-lex-c-preprocessor-symbol-file
	     (concat qt4-base-dir "/Qt/qconfig.h"))
(add-to-list 'semantic-lex-c-preprocessor-symbol-file
	     (concat qt4-base-dir "/Qt/qconfig-large.h"))
(add-to-list 'semantic-lex-c-preprocessor-symbol-file
	     (concat qt4-base-dir "/Qt/qglobal.h"))

;; sexy app framework
(add-to-list 'semantic-lex-c-preprocessor-symbol-map '("SEXY_EXPORT" . ""))

;; cairo
(add-to-list 'semantic-lex-c-preprocessor-symbol-map '("cairo_public" . ""))
(setq cairo-basedir "/usr/include/cairo")
(semantic-add-system-include cairo-basedir 'c-mode)
(semantic-add-system-include cairo-basedir 'c++-mode)

;; glib-2.0
(setq glib2-basedir "/usr/include/glib-2.0")
(setq glib2-config "/usr/lib/glib-2.0/include/glibconfig.h")
(add-to-list 'semantic-lex-c-preprocessor-symbol-file glib2-config)
(semantic-add-system-include glib2-basedir 'c-mode)
(semantic-add-system-include glib2-basedir 'c++-mode)

;; pango-1.0
(setq pango-basedir "/usr/include/pango-1.0")
(semantic-add-system-include pango-basedir 'c-mode)
(semantic-add-system-include pango-basedir 'c++-mode)

;; gtk-2.0
(setq gtk2-basedir "/usr/include/gtk-2.0")
(setq gtk2-config "/usr/lib/gtk-2.0/include/gdkconfig.h")
(add-to-list 'semantic-lex-c-preprocessor-symbol-file gtk2-config)
(semantic-add-system-include gtk2-basedir 'c-mode)
(semantic-add-system-include gtk2-basedir 'c++-mode)

;; vala
(autoload 'vala-mode "vala-mode" "Major mode for editing Vala code." t)
(require 'vala-mode)
(add-to-list 'auto-mode-alist '("\\.vala$" . vala-mode))
(add-to-list 'auto-mode-alist '("\\.vapi$" . vala-mode))
(add-to-list 'file-coding-system-alist '("\\.vala$" . utf-8))
(add-to-list 'file-coding-system-alist '("\\.vapi$" . utf-8))

;; for ecb
(add-hook 'vala-mode-hook #'wisent-csharp-default-setup)

;; set color theme if emacs is windowed
(require 'color-theme)
(color-theme-initialize)
(if window-system
    (progn
      (color-theme-bharadwaj-slate)))

;;color terminal
(require 'ansi-color)
(add-hook 'shell-mode-hook 'ansi-color-for-comint-mode-on)

;; ask for y or n instead
(fset 'yes-or-no-p 'y-or-n-p)

(transient-mark-mode t)

(add-hook 'find-file-hooks 'auto-insert)

(show-paren-mode t)

;;(setq lazy-lock-defer-on-scrolling t)
;;(setq font-lock-support-mode 'lazy-lock-mode)
;;(setq font-lock-maximum-decoration t)

;; setup keybinds
(global-set-key [f5] 'ecb-activate)
(global-set-key [f6] 'ecb-deactivate)
(global-set-key [f9] 'compile)
(global-set-key [f12] 'gdb)

;;session
(require 'session)
(add-hook 'after-init-hook 'session-initialize)

;; setup tabbar
(require 'tabbar)
(tabbar-mode)
(global-set-key [(s-down)] 'tabbar-backward-group)
(global-set-key [(s-up)] 'tabbar-forward-group)
(global-set-key (kbd "s-b") 'tabbar-backward)
(global-set-key (kbd "s-f") 'tabbar-forward)

;; kill a line
(defun kill-whole-line nil
  "delete the whole line"
  (interactive)
  (beginning-of-line)
  (push-mark)
  (beginning-of-line 2)
  (kill-region (point) (mark)))
(global-set-key "\M-\S-d" 'kill-whole-line)

;; compile .emacs
(defun autocompile nil
  "compile itself if ~/.emacs"
  (interactive)
  (if (string= (buffer-file-name) (concat default-directory ".emacs"))
      (byte-compile-file (buffer-file-name))))
(add-hook 'after-save-hook 'autocompile)

;; setup cc styles
(require 'setup-cc-styles)

;; guess offset
(require 'guess-offset)

;;M-x desktop-clear
;;(load "desktop")
;;(desktop-save-mode)
;;(desktop-read)
;;(global-set-key [f11] 'desktop-save)
(require 'doxymacs)
(add-hook 'c-mode-common-hook 'doxymacs-mode)

;; emacs
(add-to-list 'auto-mode-alist '("emacs/emacs" . lisp-mode))

;; scons
(add-to-list 'auto-mode-alist '("SConstruct" . python-mode))
(add-to-list 'auto-mode-alist '("SConscript" . python-mode))
(add-to-list 'interpreter-mode-alist '("python" . python-mode))

;; Set the fill column to 70 for human text, and 80 for code.
;;(add-hook 'text-mode-hook '(lambda () (set-fill-column 70)))
;;(add-hook 'c-mode-hook '(lambda () (set-fill-column 80)))
;;(add-hook 'c++-mode-hook '(lambda () (set-fill-column 80)))
;;(add-hook 'python-mode-hook '(lambda () (set-fill-column 80)))
;;(add-hook 'java-mode-hook '(lambda () (set-fill-column 80)))

;; setup auto-complete-mode
(require 'setup-auto-complete)

;; erc
(require 'setup-erc)

(custom-set-variables
  ;; custom-set-variables was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
 '(column-number-mode t)
 '(display-time-mode t)
 '(ecb-options-version "2.40")
 '(ecb-source-path (quote (("~/Projects" "Projects"))))
 '(scroll-bar-mode (quote right))
 '(show-paren-mode t)
 '(show-trailing-whitespace t)
 '(size-indication-mode t)
 '(transient-mark-mode t))
(custom-set-faces
  ;; custom-set-faces was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
 )

(put 'narrow-to-region 'disabled nil)