X-Git-Url: http://47.100.26.94:8080/?a=blobdiff_plain;f=emacs.d%2Finit.el;h=dff7a8e10e6106fd6f55246452c191b00f0e2bee;hb=bad615b63502f55ac9792f6c66640d3908186169;hp=95901d5344355efb0c7e02759ff30b47c34530a3;hpb=ffce0bc4f2e2fbc46d5bc79757a292edbc9306a6;p=dotfiles.git diff --git a/emacs.d/init.el b/emacs.d/init.el index 95901d5..dff7a8e 100644 --- a/emacs.d/init.el +++ b/emacs.d/init.el @@ -1,183 +1,135 @@ -;;;(if (eq system-type 'darwin) -;;; (setenv "PATH" -;;;) (concat (getenv "path") ":/usr/local/bin:~/bin/") -;;; ) - (setenv "PATH" (concat (getenv "PATH") ":/usr/local/bin")) (setq exec-path (append exec-path '("/usr/local/bin"))) (setq debug-on-error t) -(scroll-bar-mode -1) -(tool-bar-mode -1) -;(menu-bar-mode -1) -(add-to-list 'default-frame-alist '(width . 120)) -(add-to-list 'default-frame-alist '(height . 40)) -;(add-to-list 'default-frame-alist '(font . "Source Code Pro for Powerline-12:weight:light" )) -(add-to-list 'default-frame-alist '(font . "Source Code Pro for Powerline-12" )) +(add-to-list 'load-path "~/.emacs.d/config") -(put 'set-goal-column 'disabled nil) -(setq vc-follow-symlinks t) -(setq visible-bell 1) -(setq ring-bell-function 'ignore) -(setq resize-mini-windows t) +(require 'init-base) +(require 'init-font) -(add-to-list 'auto-mode-alist '("emacs\\'" . emacs-lisp-mode)) -(fringe-mode 0) +(require 'my-packages) +(require 'init-color-theme) +;(require 'init-ido) +(require 'init-magit) +(require 'init-evil) +(require 'init-project) +(require 'init-ggtags) -;;; Set symbol for the border -(set-display-table-slot standard-display-table - 'vertical-border - (make-glyph-code ?┃)) +;;;; conflict with C-c . in org-mode, disable it temporarily +;;;;(require 'init-c-cpp) +(require 'init-key-binding) +(require 'init-winner) +(require 'init-minibuffer) +(require 'init-eshell) -(set-face-attribute 'vertical-border nil :foreground "gray") +;; http://stackoverflow.com/questions/11484225/fix-an-auto-complete-mode-and-linum-mode-annoyance +;;;(ac-linum-workaround) -(add-to-list 'load-path "~/.emacs.d/config") -(require 'my-packages) +(require 'init-mode-line) +(require 'init-workgroup2) +(require 'init-perl) -;; elscreen should be placed begin of https://github.com/knu/elscreen/issues/6 -(elscreen-start) -(require 'init-elscreen) -(require 'init-color-theme) +;(add-to-list 'load-path "~/.emacs.d/Emacs-PDE-0.2.16/lisp/") +;(load "pde-load") ; +(require 'init-linum) -;--------------------------------------------------------------------------------------- -;; Ido -;; -(require 'ido-vertical-mode) -(ido-vertical-mode 1) -(require 'flx-ido) -(ido-mode 1) -(ido-everywhere 1) -(flx-ido-mode 1) -(setq ido-use-faces nil) - -(setq org-completion-use-ido t) -(setq magit-completing-read-function 'magit-ido-completing-read) - -(require 'ido-ubiquitous) -(ido-ubiquitous-mode 1) - -;; smex -(require 'smex) -(global-set-key (kbd "M-x") 'smex) -(global-set-key (kbd "M-X") 'smex-major-mode-commands) - -;;--------------------------------------------------------------------------------------- -;; Magit -;; -(require 'magit) -(setq magit-last-seen-setup-instructions "1.4.0") -;(setq magit-auto-revert-mode nil) +(require 'auto-complete) +(require 'auto-complete-config) +(ac-config-default) +(require 'init-helm) +;; page break configuration +;(require 'pp-c-l) +;(pretty-control-l-mode 1) -;;--------------------------------------------------------------------------------------- -;; evil -;; -(global-evil-leader-mode) -(evil-leader/set-leader ";") -(evil-leader/set-key "e" 'find-file) -(evil-leader/set-key "b" 'switch-to-buffer) -(evil-leader/set-key "w" 'evil-write) -(require 'evil) -;(setq key-chord-two-keys-delay 0.5) -(key-chord-define evil-insert-state-map "jj" 'evil-normal-state) -(key-chord-mode 1) - -;; cursor shape -(setq evil-emacs-state-cursor '("red" box)) -(setq evil-normal-state-cursor '("green" box)) -(setq evil-visual-state-cursor '("orange" box)) -(setq evil-insert-state-cursor '("red" bar)) -(setq evil-replace-state-cursor '("red" bar)) -(setq evil-operator-state-cursor '("red" hollow)) -;;Enter an emacs mode in a given state http://wikemacs.org/wiki/Evil -(loop for (mode . state) in '( -; (inferior-emacs-lisp-mode . emacs) -; (wdired-mode . normal) - (eshell-mode . emacs)) - do (evil-set-initial-state mode state)) - - -;(global-evil-tabs-mode t) -;(evil-mode 1) -;;--------------------------------------------------------------------------------------- -;; Fiplr -;; -(setq fiplr-root-markers '(".git" ".svn" "*.DS_Store")) -(setq fiplr-ignored-globs '((directories (".git" ".svn")) - (files ("*.jpg" "*.png" "*.zip" "*~" "*.o" ".obj" "*.swp" "*.hg" ".pyc" ".*" )))) - -(global-set-key (kbd "C-x f") 'fiplr-find-file) - -;;--------------------------------------------------------------------------------------- -;; Wind-move -;; -(global-set-key (kbd "C-x C-l") 'windmove-right) -(global-set-key (kbd "C-x C-h") 'windmove-left) -(global-set-key (kbd "C-x C-k") 'windmove-up) -(global-set-key (kbd "C-x C-j") 'windmove-down) +;; persist command history of helm +;(require 'session) +;(add-hook 'after-init-hook 'session-initialize) -;;--------------------------------------------------------------------------------------- -;; sr-speedbar -;; -;(require 'sr-speedbar) -;(setq speedbar-use-images nil) -;(setq speedbar-show-unknown-files t) +(require 'use-package) -(toggle-frame-fullscreen) +;; persist command history of helm +(use-package savehist + :init (savehist-mode) + :config + (setq history-length 1000 + history-delete-duplicates t + savehist-additional-variables '(extended-command-history))) +;;(savehist-mode) +;; (setq history-length 1000 +;; history-delete-duplicates t +;; savehist-additional-variables '(extended-command-history)) -(require 'projectile) -(projectile-global-mode) -(setq projectile-enable-caching nil) -(require 'projectile-speedbar) +; (setq split-height-threshold 0) -;(require 'cc-mode) -;(require 'ecb) -;(setq ecb-layout-name "leftright3") -;(setq mac-command-modifier 'super) ; make cmd key do Meta -(global-set-key (kbd "") 'toggle-frame-fullscreen) +;;;(require 'helm-gtags) +;;;;(require 'setup-helm-gtags) +;;;;(helm-gtags-mode 1) +;;;;;; Enable helm-gtags-mode +;;;(add-hook 'c-mode-hook 'helm-gtags-mode) +;;;(add-hook 'c++-mode-hook 'helm-gtags-mode) +;;;(add-hook 'asm-mode-hook 'helm-gtags-mode) +;;; +;;;;; customize +;;;(custom-set-variables +;;; '(helm-gtags-path-style 'relative) +;;; '(helm-gtags-ignore-case t) +;;; '(helm-gtags-auto-update t)) +;;; +;;;;; key bindings +;;;(eval-after-load "helm-gtags" +;;; '(progn +;;; (define-key helm-gtags-mode-map (kbd "M-t") 'helm-gtags-find-tag) +;;; (define-key helm-gtags-mode-map (kbd "M-r") 'helm-gtags-find-rtag) +;;; (define-key helm-gtags-mode-map (kbd "M-s") 'helm-gtags-find-symbol) +;;; (define-key helm-gtags-mode-map (kbd "M-g M-p") 'helm-gtags-parse-file) +;;; (define-key helm-gtags-mode-map (kbd "C-c <") 'helm-gtags-previous-history) +;;; (define-key helm-gtags-mode-map (kbd "C-c >") 'helm-gtags-next-history) +;;; (define-key helm-gtags-mode-map (kbd "M-,") 'helm-gtags-pop-stack))) +;(require 'icicles) +;(icy-mode 1) -(global-set-key (kbd "M-g M-v") 'split-window-right) -(global-set-key (kbd "M-g M-s") 'split-window-below) -(global-set-key (kbd "M-g M-o") 'delete-other-windows) -(global-set-key (kbd "M-g M-w") 'other-window) +;(require 'init-org) +(setq help-window-select t) -;;;; show default directory on mode-line -(ggtags-mode 1) -;; using ido-completion for ggtags -;; https://github.com/leoliu/ggtags/issues/56 -(setq ggtags-completing-read-function - (lambda (&rest args) - (apply #'ido-completing-read - (car args) - (all-completions "" ggtags-completion-table) - (cddr args)))) +;; (add-to-list 'load-path "~/.emacs.d/site-lisp/eim") +;; (autoload 'eim-use-package "eim" "Another emacs input method") +;; +;; (register-input-method +;; "eim-wb" "euc-cn" 'eim-use-package +;; "五笔" "汉字五笔输入法" "~/.emacs.d/site-lisp/eim/wb.txt") +;; (register-input-method +;; "eim-py" "euc-cn" 'eim-use-package +;; "拼音" "汉字拼音输入法" "~/.emacs.d/site-lisp/eim/py.txt") +;; +;(require 'init-keychord) +;(setq hydra-examples-verbatim t) +;(require 'init-hydra) +;(require 'ace-window) +;(global-set-key (kbd "M-p") 'ace-window) -;; gnu global support -;(require 'semantic/db) -;(global-semanticdb-minor-mode 1) -(custom-set-variables - '(ggtags-split-window-function (quote split-window-vertically))) +(require 'init-multi-term)