.emacs

Emacs の設定ファイル。

E-Lisp を書けるわけでもなく、
ただ、検索して出てきたもののうち使えそうなのをコピペしただけ。


多分、YaTeXとAnthyとIPAフォントと言うのが入っていれば動くのではないかと思う。

プログラミング言語は、C、C++、Ruby、Haskell、そしてTeXに対応していると思う。

一応、Emacsは問題なく起動するけれど、
各言語モードなどは検証していない。


↓以下、.emacs

;; .emacs

;=====================================
; Interface
;=====================================

;; default to better frame titles
(setq frame-title-format
      (concat  "%b - emacs@" (system-name)))

;; vanish tool bar
;(tool-bar-mode 0)

;; display clock
(display-time)  

;; display line number
(setq line-number-mode t)

;; dispose scroll bar to right
(set-scroll-bar-mode 'right)

;; vanish startup message
(setq inhibit-startup-message t)
;(setq initial-scratch-message nil)

;; errar bell
(setq ring-bell-function (lambda ()))
;(setq visible-bell t)

;; color parenthesis
(show-paren-mode t)
(setq show-paren-style 'parenthesis)

;; font setting

;(create-fontset-from-fontset-spec
; "-shinonome-gothic-medium-r-normal--14-*-*-*-*-*-fontset-14")
;(set-default-font "fontset-14")

(create-fontset-from-fontset-spec
  "-misc-ipagothic-medium-r-normal--14-*-*-*-*-*-fontset-ipa")
(set-default-font "fontset-ipa")

;; font color
(global-font-lock-mode t) 
(setq font-lock-support-mode 'jit-lock-mode)

(setq font-lock-maximum-decoration t)

(add-hook 'font-lock-mode-hook
          '(lambda ()(set-face-foreground
                     'font-lock-comment-face "gray")))

;; frame setting
(setq initial-frame-alist
  (append (list
           '(foreground-color . "white") ;; font
           '(background-color . "black") ;; back ground
           '(border-color . "black")
           '(mouse-color . "white")
           '(cursor-color . "white")
           '(width . 75)   ;; frame width
           '(height . 62)  ;; frame hight
           '(top . 0)      ;; Y position
           '(left . 5)     ;; X position
          )
          initial-frame-alist))
 (setq default-frame-alist initial-frame-alist)

;===================================
; Language
;===================================

;; using ja-JP.UTF-8

;;; uncomment for CJK utf-8 support for non-Asian users
;(require 'un-define)

(set-language-environment "Japanese")
(set-terminal-coding-system 'utf-8)
(set-keyboard-coding-system 'utf-8)
(set-buffer-file-coding-system 'utf-8)
(setq default-buffer-file-coding-system 'utf-8)
(prefer-coding-system 'utf-8)
(set-default-coding-systems 'utf-8)
(setq file-name-coding-system 'utf-8)

;; using anthy
(load-library "anthy")
(setq default-input-method "japanese-anthy")
(toggle-input-method nil)
(global-set-key [zenkaku-hankaku] 'toggle-input-method)

;; display collectly Japanese info
(auto-compression-mode t)


;=====================================
;Manipulation Setting
;====================================

;; mouse wheel
(global-set-key [mouse-4] 'scroll-down)
(global-set-key [mouse-5] 'scroll-up)
(progn
 (defun scroll-up-half ()
     "Scroll up half a page."
     (interactive)
     (scroll-up (/ (window-height) 2))
 )
 (defun scroll-down-half ()
     "Scroll down half a page."
     (interactive)
     (scroll-down (/ (window-height) 2))
 )
 (global-set-key [(mouse-5)] 'scroll-up-half)
 (global-set-key [(mouse-4)] 'scroll-down-half)
)

;; edit gz file
(auto-compression-mode t)


;=====================================
;Key Setting
;=====================================

;; change to coment or uncoment
(global-set-key "\C-c;" 'comment-region)  
(global-set-key "\C-c:" 'uncomment-region)

;; kill line
(setq kill-whole-line t)

;; undo
(global-set-key "\C-z" 'undo)

;; back space
(global-set-key "\C-h" 'delete-backward-char)


;=======================================
;Progrum Mode
;======================================

;; yatex-mode
(setq auto-mode-alist
      (cons (cons "\\.tex$" 'yatex-mode) auto-mode-alist))
(autoload 'yatex-mode "yatex" "Yet Another LaTeX mode" t)
(setq YaTeX-use-AMS-LaTeX t)
(setq YaTeX-use-LaTeX2e t)

;; Ruby Mode
(add-to-list 'load-path "~/.site-lisp/ruby-mode")

(require 'ruby-mode)
(require 'ruby-electric)

(defun ruby-eval-buffer () (interactive)
"Evaluate the buffer with ruby."
(shell-command-on-region (point-min) (point-max) "ruby"))

(defun my-ruby-mode-hook ()
(font-lock-mode t)
(setq standard-indent 2)
(pabbrev-mode t)
(ruby-electric-mode t)
(define-key ruby-mode-map "\C-c\C-a" 'ruby-eval-buffer))
(add-hook 'ruby-mode-hook 'my-ruby-mode-hook)

(setq auto-mode-alist (cons '("\\.rb\\'" . rhtml-mode) auto-mode-alist))

;; C Mode
(add-hook 'c-mode-hook
          '(lambda ()
             (auto-fill-mode 1)
             (local-set-key "\M-c\M-c" 'compile)
             (local-set-key "\M-c\M-d" 'gdb)
             ))

;; C++ Mode
(add-hook 'c++-mode-hook
          '(lambda ()
             (auto-fill-mode 1)
             (local-set-key "\M-c\M-c" 'compile)
             (local-set-key "\M-c\M-d" 'gdb)
             ))

;; Haskell Mode
(setq auto-mode-alist
      (cons '("\\.hs$" . haskell-mode) auto-mode-alist))

続きを隠す

firefoxの設定

firefoxに入れているadd-onとユーザ設定の覚書。

ネットの各所を参考にして、一々何処で見たのか覚えていないため、
参考サイト及びページは書きませんが、どれもネットで調べたものなので、
気になるものは適当な語句をググってください。

コメントの付いていない設定などは、何の設定かすら覚えていないもので、
また、about:config 内に無いものは自分で新しく作ってください。

about:configが何なのか分からない人もググって下さい。

アドオン

・Gmail space (Gspace) : Gmail へftpライクにファイルを転送して保存する。
・Adblock Plus : 一部の広告をブロックする。らしい。。。
・Download Statusbar : ダウンロードの進行状況を下のバーに表示する。
・Dictionary Tooltip mod : 単語をダブルクリックすると辞書を探して意味を表示する。
（バージョンが1を越えると有料らしいので0.9台のを入れる。）
・Greasemonkey：サイトに手を加えて自分の見易いようにできる。らしい。。。使ったこと無い。
・Cooliris Previews:　リンク上にマウスを持って行くだけでリンク先を覗き見できる。
・Text Link:　URLのテキストをダブルクリックするだけでリンク先を見れる。
・FEBE：設定のバックアップを取れる。
・SiteDelta：定期的に見るサイトなどの前回との差分のみ表示する。

マウスジェスチャは嫌いなので入れていない。


設定（about:config）

・accessibility.typeaheadfind.flashBar　整数値　0
・app.update.lastUpdateTime.addon-background-update-timer　整数値　1179896234
・app.update.lastUpdateTime.background-update-timer　整数値　1179896234
・app.update.lastUpdateTime.blocklist-background-update-timer　整数値　1179896234
・app.update.lastUpdateTime.search-engine-update-timer　整数値　1179948128
・browser.cache.memory.capacity　整数値　65536
・browser.sessionhistory.max_entries　整数値　30
・browser.sessionhistory.max_total_viewers　整数値　4
・content.interrupt.parsing　真偽値　true
・content.max.tokenizing.time 整数値　2250000
・content.notify.backoffcount　整数値　5
・content.notify.interval　整数値　750000
・content.notify.ontimer　真偽値　true
・content.switch.threshold 整数値　750000
・network.dns.disableIPv6　真偽値　true
・network.protocol-handler.warn-external.mailto 真偽値　true
・nglayout.initialpaint.delay 整数値　0
・plugin.expose_full_path　真偽値　true
・pref.browser.homepage.disable_button.current_page 真偽値　false

後は直接いじること無しに出来てしまう設定と何が何なのかさっぱり分からない設定のみ。

続きを隠す