Skip to content

Instantly share code, notes, and snippets.

@torus
Last active December 15, 2015 14:09
Show Gist options
  • Select an option

  • Save torus/5271974 to your computer and use it in GitHub Desktop.

Select an option

Save torus/5271974 to your computer and use it in GitHub Desktop.
;; -*- coding: utf-8 -*-
(global-set-key "\C-h" 'backward-delete-char)
(global-set-key "\M-o" 'other-window)
(global-set-key "\C-c\C-c" 'comment-region)
;; Quick brown fox
;; 東京は美しいの街
(add-to-list 'load-path (expand-file-name "~/local/site-lisp/yatex1.77"))
(add-to-list 'auto-mode-alist '("\\.tex\\'" . yatex-mode))
(require 'yatex)
;; Ack
;; http://www.emacswiki.org/emacs/Ack
(setenv "PATH" (concat "/usr/local/bin:" (getenv "PATH")))
(defvar ack-history nil
"History for the `ack' command.")
(defun ack (command-args)
(interactive
(let ((ack-command "ack --nogroup --with-filename "))
(list (read-shell-command "Run ack (like this): "
ack-command
'ack-history))))
(let ((compilation-disable-input t))
(compilation-start (concat command-args " < " null-device)
'grep-mode)))
(load (expand-file-name "~/.emacs.d/scheme.el"))
(custom-set-variables
;; custom-set-variables was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(add-log-full-name "Toru Hisai")
'(add-log-mailing-address "[email protected]")
'(c-basic-offset 4)
'(c-default-style (quote ((c++-mode . "k&r") (java-mode . "java") (awk-mode . "awk") (other . "gnu"))))
'(column-number-mode t)
'(current-language-environment "Japanese")
'(custom-enabled-themes (quote (tango-dark)))
'(exec-path (quote ("/Users/toru/local/gauche/bin" "/usr/local/bin" "/usr/bin" "/bin" "/usr/sbin" "/sbin" "/Applications/Emacs.app/Contents/MacOS/libexec" "/Applications/Emacs.app/Contents/MacOS/bin")))
'(ido-default-buffer-method (quote selected-window))
'(ido-enable-flex-matching t)
'(ido-mode (quote both) nil (ido))
'(indent-tabs-mode nil)
'(ispell-program-name "/usr/local/bin/aspell")
'(lua-mode-hook (quote ((lambda nil (local-set-key "" (quote comment-region))))))
'(ns-command-modifier (quote meta))
'(package-archives (quote (("gnu" . "http://elpa.gnu.org/packages/") ("melpa" . "http://melpa.milkbox.net/packages/"))))
'(parens-require-spaces nil)
'(scheme-program-name "/Users/toru/local/gauche-head/bin/gosh")
'(show-paren-mode t)
'(size-indication-mode t)
'(tab-width 4)
'(tool-bar-mode nil))
(custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(default ((t (:inherit nil :stipple nil :background "#2e3436" :foreground "#eeeeec" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 120 :width normal :foundry "apple" :family "Source_Code_Pro")))))
(put 'upcase-region 'disabled nil)
;; http://d.hatena.ne.jp/minus9d/20131103/1383475472
;; 日本語
(set-fontset-font
nil 'japanese-jisx0208
(font-spec :family "Hiragino Kaku Gothic ProN")) ;; font
;; 半角と全角の比を1:2にしたければ
(setq face-font-rescale-alist
'((".*Hiragino_Kaku_Gothic_ProN.*" . 1.2)));; Mac用フォント設定
(put 'downcase-region 'disabled nil)
[user]
name = Hisai Toru
email = [email protected]
[core]
excludesfile = /Users/toru/.gitignore_global
[difftool "sourcetree"]
cmd = opendiff \"$LOCAL\" \"$REMOTE\"
path =
[mergetool "sourcetree"]
cmd = /Applications/SourceTree.app/Contents/Resources/opendiff-w.sh \"$LOCAL\" \"$REMOTE\" -ancestor \"$BASE\" -merge \"$MERGED\"
trustExitCode = true
[push]
default = simple
[filter "media"]
clean = git-media-clean %f
smudge = git-media-smudge %f
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment