Skip to content

Instantly share code, notes, and snippets.

@maleic1618
Last active March 5, 2017 18:57
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save maleic1618/ef309f063b67f5fb04f41f080a3e51e8 to your computer and use it in GitHub Desktop.
Save maleic1618/ef309f063b67f5fb04f41f080a3e51e8 to your computer and use it in GitHub Desktop.
(add-to-list 'load-path "~/.emacs.d/el-get/el-get")
(unless (require 'el-get nil t)
(url-retrieve
"https://github.com/dimitri/el-get/raw/master/el-get-install.el"
(lambda (s)
(end-of-buffer)
(eval-print-last-sexp))))
;; So the idea is that you copy/paste this code into your *scratch* buffer,
;; hit C-j, and you have a working el-get.
(global-linum-mode)
(show-paren-mode)
(keyboard-translate ?\C-h ?\C-?)
(setq inhibit-startup-message t)
(setq x-select-enable-clipboard t)
(setq-default indent-tabs-mode nil)
(menu-bar-mode 0)
(tool-bar-mode 0)
(load-theme 'tsdh-dark t)
(setq x-select-enable-clipboard t)
(el-get-bundle helm)
(require 'helm)
(require 'helm-config)
(global-set-key (kbd "M-x") 'helm-M-x)
(helm-mode 1)
(el-get-bundle hl-line+)
(require 'hl-line+)
(global-hl-line-mode t)
(toggle-hl-line-when-idle)
(setq hl-line-idle-interval 0.01)
(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.
)
(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.
'(hl-line ((t (:background "brightred")))))
(el-get-bundle anzu)
(global-anzu-mode +1)
(el-get-bundle undo-tree)
(require 'undo-tree)
(global-undo-tree-mode t)
(global-set-key (kbd "M-/") 'undo-tree-redo)
(el-get-bundle auto-save-buffers-enhanced)
(require 'auto-save-buffers-enhanced)
(setq auto-save-buffers-enhanced-interval 1)
(auto-save-buffers-enhanced t)
(el-get-bundle mew)
(require 'mew)
(el-get-bundle markdown-mode)
(require 'markdown-mode)
(el-get-bundle org-mode)
(el-get-bundle emacs-w3m)
(el-get-bundle ace-jump-mode)
(require 'ace-jump-mode)
(global-set-key (kbd "C-:") 'ace-jump-line-mode)
;;(global-set-key (kbd "C-;") 'ace-jump-word-mode)
(el-get-bundle highlight-symbol)
(require 'highlight-symbol)
(setq highlight-symbol-colors '("LightSeaGreen" "HotPink" "SlateBlue1" "DarkOrange" "SpringGreen1" "tan" "DodgerBlue1"))
;;(global-set-key (kbd "C-l C-l") 'highlight-symbol-at-point)
;; transparent configuration
(defun set-alpha (alpha-num)
"set frame parameter 'alpha"
(interactive "nAlpha: ")
(set-frame-parameter nil 'alpha (cons alpha-num '(90))))
(setq display-time-string-forms
'((format "%s/%s/%s(%s) %s:%s" year month day dayname 24-hours minutes)
load))
;; 時刻表示の左隣に日付を追加。
(setq display-time-kawakami-form t)
;; 24時間制
(setq display-time-24hr-format t)
;; 時間を表示
(display-time)
;; モードラインの色設定
(progn
(set-face-foreground 'mode-line "Yellow")
(set-face-background 'mode-line "Black")
)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment