.emacs.my.el

(autoload 'lookup "lookup" nil t)
(autoload 'lookup-region "lookup" nil t)
(autoload 'lookup-pattern "lookup" nil t)
(setq lookup-search-agents '((ndeb "~/dict/cobuild")))
(define-key ctl-x-map "l" 'lookup) ; C-x l - lookup
(define-key ctl-x-map "y" 'lookup-region) ; C-x y - lookup
(define-key ctl-x-map "\C-y" 'lookup-pattern) ; C-x C-y - look

(setq user-full-name "hoge")
(setq user-mail-address "hoge@foobar")


(setq its-hira-period "．")
(setq its-hira-comma "，")

(column-number-mode t)
(line-number-mode t)

(when (boundp 'show-trailing-whitespace) (setq-default show-trailing-whitespace t))

(require 'navi2ch)
(setq navi2ch-net-http-proxy "proxy.hogehoge.net:8080")

(setq uim-default-im-engine "anthy")
(require 'un-define)

(setq its-barf-on-invalid-keyseq nil)