.emacs

 ;为我的emacs配置主题色彩 (color-theme-色彩名称)  
  (add-to-list 'load-path "~/elisp/color-theme")
  (require 'color-theme)
  (color-theme-initialize)  
  (color-theme-oswald)  
  
  
  ;preview-latex
  (add-to-list 'load-path
  "~/Downloads/auctex-11.86/preview")
  (require 'preview)
  
  ; yasnippet
  
  
  (add-to-list 'load-path
           "~/.emacs.d/plugins/yasnippet")
  (require 'yasnippet)
  (yas/initialize)
  (yas/load-directory "~/.emacs.d/plugins/yasnippet/snippets")
  (yas/minor-mode-on)
  
  ; this breaks things; use the below advise solution instead
  ;(add-hook 'org-mode-hook
  ;       (lambda ()
  ;         (org-set-local 'yas/trigger-key [tab])
  ;         (define-key yas/keymap [tab] 'yas/next-field-group)))
  
  ; when cdlatex-mode or org-cdlatex-mode are loaded, we need to change
  ; the behaviour of yas/fallback to call cdlatex-tab
  
  (defun yas/advise-indent-function (function-symbol)
    (eval `(defadvice ,function-symbol (around yas/try-expand-first activate)
             ,(format
               "Try to expand a snippet before point, then call `%s' as usual"
               function-symbol)
             (let ((yas/fallback-behavior nil))
               (unless (and (interactive-p)
                            (yas/expand))
                 ad-do-it)))))
  
  (yas/advise-indent-function 'cdlatex-tab)
  (yas/advise-indent-function 'org-cycle)
  (yas/advise-indent-function 'org-try-cdlatex-tab)
  (add-hook 'org-mode-hook 'yas/minor-mode-on)
  
  
  
  
  
  ;cdlatex 
  (add-to-list 'load-path
  "~/elisp")
  (require 'cdlatex)



  
  
  ;fontsize
  (set-face-attribute 'default nil :height 150)
  
  ;fullscreen
  (global-set-key [f11]'my-fullscreen)
  (defun my-fullscreen ()
    (interactive)
    (x-send-client-message
     nil 0 nil "_NET_WM_STATE" 32
     '(2 "_NET_WM_STATE_FULLSCREEN" 0))
  )
  (defun my-maximized ()
    (interactive)
    (x-send-client-message
     nil 0 nil "_NET_WM_STATE" 32
     '(1 "_NET_WM_STATE_MAXIMIZED_HORZ" 0))
    (interactive)
    (x-send-client-message
     nil 0 nil "_NET_WM_STATE" 32
     '(1 "_NET_WM_STATE_MAXIMIZED_VERT" 0)))
  (my-maximized)
  
  
  ;;关闭起动时的那个“开机画面”
  (setq inhibit-startup-message t)
  
  
  ;不要滚动栏
  (scroll-bar-mode nil)
  
  
  ;改变emacs标题栏的标题
  (setq frame-title-format "%b_Luqing Ye")
  
  ;让M-w 能复制内容到剪切板
  (setq x-select-enable-clipboard t)
  
  ;当指针到一个括号时，自动显示所匹配的另一个括号
  (show-paren-mode 1)
  
  ;ibus
  (add-to-list 'load-path "~/.emacs.d/ibus/")
  (require 'ibus)
  (add-hook 'after-init-hook 'ibus-mode-on)
  (global-set-key (kbd "C-=") 'ibus-toggle) ;;这里既是绑定上面设置的C+=快捷键到ibus中
  (ibus-define-common-key ?\C-\s nil)
  ;; Use C-/ for Undo command
  (ibus-define-common-key ?\C-/ nil)
  ;; Change cursor color depending on IBus status
  (setq ibus-cursor-color '("red" "black" "green"))
  
  
  
  ;auctex setting,from  http://www.xemacs.org/Documentation/packages/html/auctex_4.html    
  (require 'tex-site)
  (setq TeX-auto-save t)
  (setq TeX-parse-self t)
  
  ;为了使用 AucTeX 方便，为 LaTeX 模式 hook 自动换行，数学公式，reftex 和显示行号的功能
  (mapc (lambda (mode)
        (add-hook 'LaTeX-mode-hook mode))
        (list 'auto-fill-mode
              'cdlatex-mode
              'LaTeX-math-mode
              'turn-on-reftex
              'linum-mode))
  
  
  
  
  
  
  (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.
   '(show-paren-mode t)
   '(tool-bar-mode nil))
  (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.
   )
  
  
  
  
  
  (setq TeX-save-query nil) ;;autosave latex file before compiling
  
  
  
  
  
  
  
  ;;1.This will make sure org gets loaded, and some basic global key combinations are defined
  ;;2.If you've configured your Emacs initialization file as suggested below, Emacs should enter org-mode whenever you visit or create a file with the extension ".org".
  (require 'org-install)
  (add-to-list 'auto-mode-alist '("\\.org$" . org-mode))
  (define-key global-map "\C-cl" 'org-store-link)
  (define-key global-map "\C-ca" 'org-agenda)
  (setq org-log-done t)
  
  
  
  
  ;;org mode自动换行
  (add-hook 'org-mode-hook
      (lambda () (setq truncate-lines nil)))
  
  
  
  
  
  
  
  (add-to-list 'load-path "~/elisp")
  (require 'cdlatex)
  (require 'texmathp)
  ;load org-cdlatex-mode for all org files
  (add-hook 'org-mode-hook 'turn-on-org-cdlatex)
  
  
  
  
  
  ;; all backups goto ~/.backups instead in the current directory
  (setq backup-directory-alist (quote (("." . "~/.backups"))))
  
  
  ;use pdflatex
  (setq latex-run-command "pdflatex")
  
  
  ;generate pdf when complile.
  (setq TeX-PDF-mode t)



(defun replace-matching-parens ()
  (interactive)
  (save-excursion
    (let ((end-point (point)))
      (backward-list)
      (let ((start-point (point)))
        (goto-char end-point)
        (re-search-backward ")" nil t)
        (replace-match " \\\\right)" nil nil)

        (goto-char start-point)
        (re-search-forward "(" nil t)
        (replace-match "\\\\left( " nil nil)))))





;Asymptote
(add-to-list 'load-path "/usr/share/asymptote")
(autoload 'asy-mode "asy-mode.el" "Asymptote major mode." t)
(autoload 'lasy-mode "asy-mode.el" "hybrid Asymptote/Latex major mode." t)
(autoload 'asy-insinuate-latex "asy-mode.el" "Asymptote insinuate LaTeX." t)
(add-to-list 'auto-mode-alist '("\\.asy$" . asy-mode))

;two-mode-mode
  (add-to-list 'load-path
  "~/elisp")
  (require 'two-mode-mode)