Skip to content

Instantly share code, notes, and snippets.

@hiroyuki-sato
Created December 16, 2013 12:40
Show Gist options
  • Save hiroyuki-sato/7986378 to your computer and use it in GitHub Desktop.
Save hiroyuki-sato/7986378 to your computer and use it in GitHub Desktop.
.emacs
; 言語を日本語にする
(set-language-environment 'Japanese)
; UTF-8とする
(prefer-coding-system 'utf-8)
; 起動時の画面はいらない
(setq inhibit-startup-message t)
(setq-default ispell-program-name "aspell")
(set-default-font
"-*-Osaka-normal-normal-normal-*-12-*-*-*-m-0-iso10646-1")
(set-frame-height (next-frame) 50)
(set-frame-width (next-frame) 80)
;; メニューバーを隠す
(tool-bar-mode -1)
(set-face-attribute 'default nil :family "monaco" :height 150)
(set-fontset-font
(frame-parameter nil 'font)
'japanese-jisx0208
'("Hiragino Kaku Gothic ProN" . "iso10646-1"))
(set-fontset-font
(frame-parameter nil 'font)
'japanese-jisx0212
'("Hiragino Kaku Gothic ProN" . "iso10646-1"))
(set-fontset-font
(frame-parameter nil 'font)
'mule-unicode-0100-24ff
'("monaco" . "iso10646-1"))
(setq face-font-rescale-alist
'(("^-apple-hiragino.*" . 1.2)
(".*osaka-bold.*" . 1.2)
(".*osaka-medium.*" . 1.2)
(".*courier-bold-.*-mac-roman" . 1.0)
(".*monaco cy-bold-.*-mac-cyrillic" . 0.9) (".*monaco-bold-.*-mac-roman" . 0.9)
("-cdac$" . 1.3)))
(global-set-key "¥C-h" 'delete-backward-char)
;
(setq load-path (append (list
(expand-file-name "/usr/local/share/gtags")
)
load-path))
(autoload 'gtags-mode "gtags" "" t)
(add-hook 'c-mode-hook
'(lambda ()
(gtags-mode 1)))
(setq gtags-suggested-key-mapping 5)
;(setq gtags-mode-hook
; '(lambda ()
; (local-set-key "¥M-t" 'gtags-find-tag)
; (local-set-key "¥M-r" 'gtags-find-rtag)
; (local-set-key "¥M-s" 'gtags-find-symbol)
; (local-set-key "¥C-t" 'gtags-pop-stack)
; ))
;
; org-mode
;
(add-to-list 'load-path "/usr/local/share/emacs/site-lisp/org/lisp")
(add-to-list 'load-path "/usr/local/share/emacs/site-lisp")
(require 'succor)
;; ノートを保存するディレクトリ
(setq *succor-directory* "~/.succor/")
;; gtagsのジャンプと連携する
(setq succor-gtags-enable t)
;; imenuのジャンプと連携する
(setq succor-imenu-enable t)
;ノートを保存するディレクトリ
(setq *succor-directory* (expand-file-name "~/.succor/"))
(setq *succor-file-extension* ".og")
;(setq gtags-mode-hook '(succor))
;(setq eshell-path-env (getenv "PATH"))
(setenv "PATH" (concat (expand-file-name "/usr/local/bin:") (getenv "PATH")))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment