tokyo-emacsに行ってきたよ
id:hayamiz主催のtokyo-emacsに参加してきました。
.emacsコピペ厨のためのelisp入門の話をしたり、数人が便利なelispを紹介したりするオフ会でした。
id:naoya_tが数年前に作った英辞郎の辞書を引くelispを紹介していたので、会のあとに
「今ならMac版のソフトもありますよ」
と言ったら
「あ、それ作ったの俺だよ」
と返ってきたのに一番驚きました。さすがですね。
第2回が秋ごろに開催される予定なので、それまでにコピペ厨を抜けだせたら是非参加したいと思います。
はやみずさんおつかれさまでした!
ちなみにemacsでも動くgdbの動画はこちら。
http://zoome.jp/hayamiz/diary/1/
.emacs晒し
見栄えの話ですが、Carbon Emacsでの「背景黒色&半透明&全画面」、そしてデスクトップ背景*1を和風をとても気に入っています。
こんなかんじ。
(add-to-list 'load-path "~/dotfiles/.elisp") (add-to-list 'load-path "~/dotfiles/.elisp/tuareg") ;;(setq auto-mode-alist (cons '("??.ml??w?" . tuareg-mode) auto-mode-alist)) (autoload 'tuareg-mode "tuareg" "Major mode for editing Caml code" t) (autoload 'camldebug "camldebug" "Run the Caml debugger" t) ;;smart-compile (require 'smart-compile) ;; Hide Menubar? (setq mac-autohide-menubar-on-maximize nil) ;; Maximixe window size (mac-toggle-max-window) ;;Color (if window-system (progn (set-background-color "Black") (set-foreground-color "LightGray") (set-cursor-color "Gray") )) ;; Alpha ;;(set-frame-parameter nil 'alpha '(<active> [<inactive>])) (set-frame-parameter nil 'alpha 80) ;; (set-frame-parameter nil 'alpha 0.8) ;; (set-frame-parameter nil 'alpha '(100 70)) ;; (set-frame-parameter nil 'alpha '(nil 70)) ;; (set-frame-parameter nil 'alpha '(0.8 nil)) ;; (set-frame-parameter nil 'alpha nil) ;; (add-to-list 'default-frame-alist '(alpha . (100 70))) ;; (setq frame-alpha-lower-limit 20) ;; (setq frame-alpha-lower-limit 0.2) ;; (setq frame-alpha-lower-limit nil) ;; Highlight Parens (load "mic-paren.el") (require 'mic-paren) (paren-activate) ;; Visible marked area (transient-mark-mode t) ;; GNU Global Settings (load "gtags.el") (autoload 'gtags-mode "gtags" "" t) (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) )) (add-hook 'c-mode-common-hook '(lambda() (gtags-mode 1) (gtags-make-complete-list) )) ;; For Shell-Mode (M-x shell) (autoload 'ansi-color-for-comint-mode-on "ansi-color" "Set `ansi-color-for-comint-mode' to t." t) (add-hook 'shell-mode-hook 'ansi-color-for-comint-mode-on) ;; Yatex Mode (setq auto-mode-alist (cons '("\\.tex$" . yatex-mode) auto-mode-alist))
