Chinaunix首页 | 论坛 | 博客
  • 博客访问: 918228
  • 博文数量: 132
  • 博客积分: 9976
  • 博客等级: 中将
  • 技术积分: 1781
  • 用 户 组: 普通用户
  • 注册时间: 2007-08-30 20:40
文章分类

全部博文(132)

文章存档

2013年(1)

2011年(1)

2010年(15)

2009年(77)

2008年(36)

2007年(2)

我的朋友

分类: 系统运维

2009-04-18 19:24:21

; truncate lines
(setq default-truncate-lines t)

; turn on terminal mouse support                                                                                                              
(xterm-mouse-mode t)

; define F12 key to activate ecb
(global-set-key[f12]'ecb-activate)

; define C-F12 key to deactivate ecb
(global-set-key[C-f12]'ecb-deactivate)

; maximize emace window
; (setq initial-frame-alist '((top.0)(left.0)(width.97)(height.49)))
;(and window-system
;     (setq screen-width (x-display-pixel-width)
;        screen-height (x-display-pixel-height)))
;
;(setq default-frame-alist
;      '((top . 200) (left . 400)
;        (width . 80) (height . 40)
;        (cursor-color . "white")
;        (cursor-type . box)
;        (foreground-color . "yellow")
;        (background-color . "black")
;        (font . "-*-Courier-normal-r-*-*-13-*-*-*-c-*-iso8859-1")))

; set background color and foreground color
; C-x set-face-background default #000000
; C-x set-face-background default #000000
(set-face-background 'default "#000000")
(set-face-foreground 'default "#ffffff")

; add current line highlight
; concerning website:
;
(global-hl-line-mode t)
(or (facep 'my-hl-line-face) (make-face 'chj_hl-line-face))
(setq hl-line-face 'chj_hl-line-face)
(face-spec-set 'chj_hl-line-face '((t (
                                      :background "grey29"
                                                  ;;:bold
                                                  ;;:weight nil
                                                  :inverse-video nil
                                                  ))))
; add code folder function
(add-hook 'c-mode-hook 'hs-minor-mode)
(add-hook 'c++-mode-hook 'hs-minor-mode)

; set indent size when press tab key
(setq c-basic-offset 2)


; To have Emacs automatically display the current line number
; of the point in the mode line, do"M-x line-number-mode'. You
; can also put the form
(setq line-number-mode t)

; exquisite match case search
(setq-default case-fold-search nil)
; do not change the case when replace
(setq-default case-replace nil)

; set show column number
(column-number-mode t)

; to make tab key enable
(setq c-tab-always-indent nil)

; do not add PC speaker aloud when press tab key
(setq visible-bell t)

; show line number and column number
(column-number-mode t)

; highlight the selected area
(transient-mark-mode t)

; show time information
(display-time)

; show matched parenthesis
(show-paren-mode t)

; do not produce temp file
(setq-default make-backup-files nil)

; for speedbar ========================================================
; 1. Add speedbar's directory to your load path
(add-to-list 'load-path "/home/cjash/book/ecb/speedbar-#.#")
(add-to-list 'load-path "/home/cjash/book/ecb/speedbar-0.14beta4/")

; Be sure to replace the directory above with the actual path to where
; speedbar was unpacked. This will make sure the latest version of
; speedbar superceeds any version already installed on your system.

; 2. Add bindings to make it easier to use speedbar.
(autoload 'speedbar-frame-mode "speedbar" "Popup a speedbar frame" t)
(autoload 'speedbar-get-focus "speedbar" "Jump to speedbar frame" t)

(global-set-key [(f4)] 'speedbar-get-focus)
; Using F4, you can now toggle between the speedbar frame, and the
; frame speedbar was started from.

; 3. Add auto loads for the auxiliary packages.
; For any version of emacs:

; Texinfo fancy chapter tags
(add-hook 'texinfo-mode-hook (lambda () (require 'sb-texinfo)))

; HTML fancy chapter tags
(add-hook 'html-mode-hook (lambda () (require 'sb-html)))


; for eieio ===============================================
; 1. Add eieio's directory to your load path.
(add-to-list 'load-path "/home/cjash/book/ecb/eieio-0.17")
; Be sure to replace the directory above with the actual path to
; where eieio was unpacked. This will make sure the latest version
; of eieio superceeds any version already installed on your system.

; for semantic ============================================
; 1. Install load hooks
(add-to-list 'load-path "/home/cjash/book/ecb/semantic-1.4.4")
(setq semantic-load-turn-everything-on t)
(require 'semantic-load)
(setq semanticdb-default-save-directory "/tmp")

; for COGRE ===============================================
(add-to-list 'load-path "/home/cjash/book/ecb/COGRE-0.2")
(require 'cogre)


; for CEDET ===============================================
;; Load CEDET
;;(load-file "/home/cjash/book/ecb/cedet-1.0pre4"
;; (setq semanticdb-default-save-directory "/tmp/semantic.cache") have error
;; Enabling various SEMANTIC minor modes.
;; Select one of the following:

;; 1. This enables the database and idle reparse engines
;; (semantic-load-enable-minimum-features)

;; 2. This enables some tools useful for coding, such as summary mode
;; imenu support, and the semantic navigator
;; (semantic-load-enable-code-helpers)

;; 3. This enables even more coding tools such as the nascent intellisense mode
;; decoration mode, and stickyfunc mode (plus regular code helpers)
;; (semantic-load-enable-gaudy-code-helpers)

;; 4. This turns on which-func support (Plus all other code helpers)
;; (semantic-load-enable-excessive-code-helpers)

;; 5. This turns on modes that aid in grammar writing and semantic tool
;; development. It does not enable any other features such as code
;; helpers above
;; (semantic-load-enable-semantic-debugging-helpers)

;; for ecb ============================================================

;; Add the new ECB-directory to your 'load-path' variable.
(add-to-list 'load-path "/home/cjash/book/ecb/ecb-2.32")

;; Load ECB by adding code to your  '.emacs':
(require 'ecb)

(require 'ecb-autoloads)


(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)
 '(delete-selection-mode nil)
 '(display-time-mode t)
 '(ecb-auto-activate t)
 '(ecb-eshell-auto-activate nil)
 '(ecb-layout-window-sizes (quote (("left8" (0.1794871794871795 . 0.2857142857142857) (0.1794871794871795 . 0.23214285714285715) (0.1794871794871795 . 0.2857142857142857) (0.1794871794871795 . 0.17857142857142858)))))
 '(ecb-maximize-ecb-window-after-selection t)
 '(ecb-options-version "2.32")
 '(ecb-primary-secondary-mouse-buttons (quote mouse-1--mouse-2))
 '(ecb-tip-of-the-day nil)
 '(highlight-nonselected-windows t)
 '(inhibit-startup-screen t)
 '(scalable-fonts-allowed t)
 '(scroll-bar-mode (quote right))
 '(show-paren-mode t)
 '(transient-mark-mode t)
 '(truncate-lines t)
 '(x-stretch-cursor 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.
 '(default ((t (:stipple nil :background "#000000" :foreground "#dddddd" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight bold :height 200 :width normal :family "ibm-courier"))))
 '(bold ((t (:weight bold :height 20))))
 '(cursor ((t (:background "#ffffff" :foreground "black")))))

(put 'scroll-left 'disabled nil)


; for color theme
(add-to-list 'load-path "~/.emacs.d/color-theme-6.6.0/")
(require 'color-theme)
(color-theme-initialize)
(color-theme-midnight)

;
(add-to-list 'load-path "~/.emacs.d/")
;
(require 'zjl-hl)

;; (require 'zjl-hl)
;; 
(zjl-hl-enable-global-all-modes)
;(zjl-hl-disable-global-all-modes)


(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)
 '(delete-selection-mode nil)
 '(display-time-mode t)
 '(ecb-auto-activate t)
 '(ecb-eshell-auto-activate nil)
 '(ecb-gzip-setup (quote cons))
 '(ecb-layout-window-sizes (quote (("left8" (0.1794871794871795 . 0.2857142857142857) (0.1794871794871795 . 0.23214285714285715) (0.1794871794871795 . 0.2857142857142857) (0.1794871794871795 . 0.17857142857142858)))))
 '(ecb-maximize-ecb-window-after-selection t)
 '(ecb-options-version "2.32")
 '(ecb-primary-secondary-mouse-buttons (quote mouse-1--mouse-2))
 '(ecb-tar-setup (quote cons))
 '(ecb-tip-of-the-day nil)
 '(ecb-wget-setup (quote cons))
 '(highlight-nonselected-windows t)
 '(inhibit-startup-screen t)
 '(scalable-fonts-allowed t)
 '(scroll-bar-mode (quote right))
 '(show-paren-mode t)
 '(truncate-lines t)
 '(x-stretch-cursor 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.
 '(default ((t (:inherit nil :stipple nil :background "#000000" :foreground "#ffffff" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 98 :width normal :foundry "outline" :family "Courier New"))))
 '(bold ((t (:weight bold :height 20))))
 '(cursor ((t (:background "#ffffff" :foreground "black")))))

(put 'scroll-left 'disabled nil)


文件:ecb.all.tar.bz2
大小:3015KB
下载:下载
 highlight.zip   
阅读(1157) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~