Cask

(source gnu)
(source melpa)

(depends-on "ace-jump-mode")
(depends-on "anzu")
(depends-on "auto-complete")
(depends-on "autopair")
(depends-on "bind-key")
(depends-on "buffer-move")
(depends-on "cask")
(depends-on "darcula-theme")
(depends-on "dash")
(depends-on "elscreen")
(depends-on "exec-path-from-shell")
(depends-on "expand-region")
(depends-on "f")
(depends-on "flycheck")
(depends-on "flycheck-cask")
(depends-on "fuzzy")
(depends-on "git-gutter")
(depends-on "goto-chg")
(depends-on "helm")
(depends-on "helm-descbinds")
(depends-on "helm-swoop")
(depends-on "htmlize")
(depends-on "idle-highlight-mode")
(depends-on "inf-ruby")
(depends-on "magit")
(depends-on "multiple-cursors")
(depends-on "pallet")
(depends-on "popup")
(depends-on "popwin")
(depends-on "pos-tip")
(depends-on "ruby-block")
(depends-on "ruby-compilation")
(depends-on "ruby-end")
(depends-on "ruby-interpolation")
(depends-on "ruby-mode")
(depends-on "ruby-test-mode")
(depends-on "ruby-tools")
(depends-on "s")
(depends-on "thingopt")
(depends-on "use-package")
(depends-on "web-mode")
(depends-on "wrap-region")
(depends-on "yascroll")
(depends-on "yasnippet")

init.el

;; brewで入れたtool用のpathを追加
(add-to-list 'load-path "/usr/local/share/emacs/site-lisp")

;; =======================================================================
;; パッケージ管理
;; =======================================================================
(require 'cask "cask.el")
(cask-initialize)
(require 'pallet)
(pallet-mode t)
;; =======================================================================

;; Auto Complete
(require 'auto-complete-config)
(ac-config-default)

;; http://qiita.com/sho7650/items/7d4a152c08c4f9d4cf14
;; 日本語設定
(setq default-input-method "MacOSX")
(set-language-environment 'Japanese)
(prefer-coding-system 'utf-8)

;; thing-opt
;; http://dev.ariel-networks.com/articles/emacs/part5/
(require 'thingopt)
(define-thing-commands)
(global-set-key (kbd "C-$") 'mark-word*)
(global-set-key (kbd "C-\"") 'mark-string)
(global-set-key (kbd "C-(") 'mark-up-list)

;; expand-region
;; https://github.com/magnars/expand-region.el
(require 'expand-region)
(global-set-key (kbd "C-=") 'er/expand-region)

;; http://melpa.org/#/multiple-cursors
(require 'multiple-cursors)
(global-set-key (kbd "C-c C-<") 'mc/mark-all-like-this)

;; Hyper
;; http://ergoemacs.org/emacs/emacs_hyper_super_keys.html
(setq ns-function-modifier 'hyper)

;; ace-jump-mode
;; http://d.hatena.ne.jp/rkworks/20120520/1337528737
(require 'ace-jump-mode)
(defun add-keys-to-ace-jump-mode (prefix c &optional mode)
  (define-key global-map
    (read-kbd-macro (concat prefix (string c)))
    `(lambda ()
       (interactive)
       (funcall (if (eq ',mode 'word)
                    #'ace-jump-word-mode
                  #'ace-jump-char-mode) ,c))))

(loop for c from ?! to ?~ do (add-keys-to-ace-jump-mode "H-" c))
(loop for c from ?! to ?~ do (add-keys-to-ace-jump-mode "H-M-" c 'word))

;; shellのpathを引き継ぐ
(when (memq window-system '(mac ns))
  (exec-path-from-shell-initialize))

;; =======================================================================
;; Appearance
;; =======================================================================
;; color-theme
(require 'darcula-theme)
;; darcula文字がでかい
;; http://www.emacswiki.org/emacs/SetFonts
(set-face-attribute 'default nil :height 140)

;; 現在行を目立たせる
(global-hl-line-mode)

;; 透明度を変更するコマンド M-x set-alpha
;; http://qiita.com/marcy@github/items/ba0d018a03381a964f24
(defun set-alpha (alpha-num)
  "set frame parameter 'alpha"
  (interactive "nAlpha: ")
  (set-frame-parameter nil 'alpha (cons alpha-num '(90))))
;; =======================================================================

;; =======================================================================
;; Helm
;; =======================================================================
(require 'helm-config)
(global-set-key (kbd "C-c h") 'helm-mini)
(helm-mode 1)

;; =======================================================================

;; 諸々設定変更
(custom-set-variables
 '(auto-save-default nil) ; disable auto save
 '(make-backup-files nil) ; disable backup file
 '(global-linum-mode t)   ; display line number
 '(ring-bell-function 'ignore) ; disable bell?
 )				   

;; =======================================================================
;; 各種file plugin
;; =======================================================================
; Agda
(load-file (let ((coding-system-for-read 'utf-8))
	     (shell-command-to-string "agda-mode locate")))

; Coq
(load-file "~/.emacs.d/coq.el")

; Ruby
(require 'ruby-block)
(ruby-block-mode t)
(setq ruby-block-highlight-toggle t)

(setq ruby-electric-expand-delimiters-list nil)
(add-hook 'ruby-mode-hook 'robe-mode)
(add-hook 'ruby-mode-hook 'ac-robe-setup)



;; =======================================================================