Sync up with November dotfiles emacs.d

Author: agsdot

.gitignore

@@ -1,14 +1,3 @@
-# Emacs temp files
-*~
-
-# Compiled list files
-.smex-items
-elpa/*
-places
-eshell/*
-projectile-bookmarks.eld
-projectile.cache
-var/pcache/*
-/.org-id-locations
-/session.*
-/tramp
+# Emacs related files
+elpa/
+.cache/

.gitmodules

@@ -1,13 +1,6 @@
-My .emacs.d/ configs
-
-Real brief intro, I'll spruce up this README soon/later.
+My .emacs.d/ configs, synced up with what has been on my dotfiles [repo](github.com/agsdot/dotfiles), as of November 2014.  
 
 git clone https://github.com/agsdot/.emacs.d.git ~/.emacs.d  
-cd ~/.emacs.d  
-git submodule init  
-git submodule update  
-
-Basically pull in my .emacs.d configs and then source the submodules, which now includes neotree.
 
 Enjoy,
 

README.md

@@ -0,0 +1,37 @@
+(require-package 'base16-theme)
+(require-package 'color-theme-sanityinc-tomorrow)
+(require-package 'monokai-theme)
+(require-package 'solarized-theme)
+(require-package 'zenburn-theme)
+
+;; (require-package 'crosshairs)
+;; (require-package 'rainbow-delimiters)
+(require-package 'smartparens)
+
+(line-number-mode t)
+(column-number-mode t)
+(global-linum-mode t)
+
+;; (require 'crosshairs)
+;; (toggle-crosshairs-when-idle 30)
+
+;; (require 'rainbow-delimiters)
+;; (global-rainbow-delimiters-mode)
+
+(require 'smartparens-config)
+(smartparens-global-mode t)
+
+(require 'whitespace)
+;; (global-whitespace-mode)
+(setq whitespace-style (quote (spaces tabs newline space-mark tab-mark newline-mark)))
+(setq whitespace-display-mappings
+      '((space-mark 32 [183] [46])
+        (tab-mark 9 [9655 9] [92 9])))
+
+;; (load-theme 'sanityinc-tomorrow-eighties t)
+;; (load "tomorrow-night-eighties-theme.el")
+;; (require 'tomorrow-night-eighties-theme)
+(require 'zenburn-theme)
+
+;;;;;;;;;;
+(provide 'init-aesthetics)

config/init-aesthetics.el

@@ -0,0 +1,96 @@
+(require-package 'f)
+(require-package 'undo-tree)
+(require-package 'hungry-delete)
+
+(defcustom dotemacs-cache-directory (concat user-emacs-directory ".cache/")
+  "The storage location for various persistent files.")
+
+(require 'f)
+(after-load 'f
+  (unless (f-exists? dotemacs-cache-directory)
+    (f-mkdir dotemacs-cache-directory)))
+
+;; Dont display logo at startup
+(setq inhibit-startup-message t)
+
+;; menu bar visibility
+(menu-bar-mode -1)
+
+;; Backup Files location
+;; https://github.com/bling/dotemacs/blob/master/config/init-core.el
+(setq backup-directory-alist
+  `((".*" . ,(concat dotemacs-cache-directory "backups")))
+  auto-save-file-name-transforms
+  `((".*" ,(concat dotemacs-cache-directory "backups") t))
+  auto-save-list-file-prefix
+  (concat dotemacs-cache-directory "auto-save-list/saves-"))
+
+;; Emacs: reopen buffers from last session on startup?
+;; http://stackoverflow.com/a/803828/2741455
+;; (desktop-save-mode 1)
+;; Some emacs desktop-save questions: how to change it to save in ~/.emacs.d/.emacs.desktop
+;; http://stackoverflow.com/a/4485083/2741455
+;; (setq desktop-path (list dotemacs-cache-directory))
+
+;; Closing all other buffers in Emacs
+;; http://stackoverflow.com/a/3417473/2741455
+(defun kill-other-buffers ()
+    "Kill all other buffers."
+    (interactive)
+    (mapc 'kill-buffer
+          (delq (current-buffer)
+                (remove-if-not 'buffer-file-name (buffer-list)))))
+
+;; How do I change the scratch message in Emacs?
+;; http://stackoverflow.com/a/1498292/2741455
+(setq initial-scratch-message ";; This is the Emacs Scratch Buffer")
+
+;; y/n instead of yes/no
+(defalias 'yes-or-no-p 'y-or-n-p)
+
+;; Don't automatically add newline to end of file
+(setq mode-require-final-newline nil)
+
+;; C-x C-j opens dired with the cursor right on the file you're editing
+(require 'dired-x)
+
+;; Turn off ding
+(setq visible-bell 1)
+
+;; FIX SHIFT-UP, impacts Emacs mode (doesn't affect Evil mode)
+;; from http://stackoverflow.com/questions/10871745/shift-up-arrow-doesnt-highlight-text-emacs-iterm2
+;; and http://lists.gnu.org/archive/html/help-gnu-emacs/2011-05/msg00211.html
+(define-key input-decode-map "\e[1;2A" [S-up])
+(if (equal "xterm" (tty-type))
+    (define-key input-decode-map "\e[1;2A" [S-up]))
+(defadvice terminal-init-xterm (after select-shift-up activate)
+  (define-key input-decode-map "\e[1;2A" [S-up]))
+
+;; copy/paste with C-c and C-v and C-x, check out C-RET too
+;; impacts Emacs mode (doesn't affect Evil mode)
+(cua-mode)
+
+;; From http://ergoemacs.org/emacs/emacs_best_redo_mode.html
+(require 'undo-tree)
+(global-undo-tree-mode t)
+(defalias 'redo 'undo-tree-redo)
+(global-set-key (kbd "C-z") 'undo) ; 【Ctrl+z】
+(global-set-key (kbd "C-S-z") 'redo) ; 【Ctrl+Shift+z】;  Mac style
+(global-set-key (kbd "C-y") 'redo) ; 【Ctrl+y】; Microsoft Windows style
+
+;; cross platform copy paste
+;(require 'cross-platform-copy-paste)
+
+(require 'recentf)
+(recentf-mode 1)
+(setq recentf-max-menu-items 25)
+(global-set-key "\C-x\ \C-r" 'recentf-open-files)
+
+(setq-default tab-width 2)
+(setq-default indent-tabs-mode nil) ;; seems to affect autocomplete modes
+
+(require 'hungry-delete)
+(global-hungry-delete-mode)
+
+;;;;;;;;;;
+(provide 'init-basics)

config/init-basics.el

@@ -0,0 +1,61 @@
+(require-package 'company)
+(require-package 'drag-stuff)
+(require-package 'git-gutter)
+(require-package 'git-timemachine)
+(require-package 'groovy-mode)
+(require-package 'js2-mode)
+(require-package 'linum-relative)
+(require-package 'lua-mode)
+(require-package 'magit)
+(require-package 'web-mode)
+(require-package 'vimrc-mode)
+
+;; enable seeing of git diffs
+(require 'git-gutter)
+(global-git-gutter-mode +1)
+
+;; http://whattheemacsd.com/setup-magit.el-01.html
+(defadvice magit-status (around magit-fullscreen activate)
+  (window-configuration-to-register :magit-fullscreen)
+  ad-do-it
+  (delete-other-windows))
+(defun magit-quit-session ()
+  "Restores the previous window configuration and kills the magit buffer"
+  (interactive)
+  (kill-buffer)
+  (jump-to-register :magit-fullscreen))
+
+(require 'web-mode)
+(add-to-list 'auto-mode-alist '("\\.html?\\'" . web-mode))
+(add-to-list 'auto-mode-alist '("\\.gsp?\\'" . web-mode))
+
+;;; use groovy-mode when file ends in .groovy or has #!/bin/groovy at start
+(require 'groovy-mode)
+(autoload 'groovy-mode "groovy-mode" "Major mode for editing Groovy code." t)
+(add-to-list 'auto-mode-alist '("\.groovy$" . groovy-mode))
+(add-to-list 'auto-mode-alist '("\.gradle$" . groovy-mode))
+(add-to-list 'interpreter-mode-alist '("groovy" . groovy-mode))
+
+;; https://immerrr.github.io/lua-mode/
+(require 'lua-mode)
+(add-to-list 'auto-mode-alist '("\\.lua$" . lua-mode))
+(add-to-list 'interpreter-mode-alist '("lua" . lua-mode))
+
+
+(require 'vimrc-mode)
+(add-to-list 'auto-mode-alist '(".vim\\(rc\\)?$" . vimrc-mode))
+
+(add-hook 'after-init-hook 'global-company-mode)
+
+(require 'drag-stuff)
+(drag-stuff-global-mode t)
+
+(require 'linum-relative)
+;; http://stackoverflow.com/a/15310340/2741455
+;; How to set defcustom variable
+(after-load 'linum-relative
+  (setq linum-relative-format "%3s ")
+  (setq linum-relative-current-symbol ""))
+
+;;;;;;;;;;
+(provide 'init-coding)

config/init-coding.el

@@ -0,0 +1,50 @@
+(require-package 'evil)
+(require-package 'evil-jumper)
+(require-package 'evil-matchit)
+(require-package 'evil-nerd-commenter)
+(require-package 'evil-numbers)
+(require-package 'powerline-evil)
+
+;; https://stackoverflow.com/questions/14302171/ctrl-u-in-emacs-when-using-evil-key-bindings
+(setq evil-want-C-u-scroll t)
+;; vim modal navigation
+(require 'evil)
+(defalias 'em 'evil-mode)
+(evil-mode 1)
+
+;; Use a semicolon instead of the colon to get into command mode
+(define-key evil-normal-state-map ";" 'evil-ex)
+
+; Make horizontal movement cross lines
+(setq-default evil-cross-lines t)
+
+;; Make Evil-Jumper jump list persist in between sessions by storing to a file
+(setq evil-jumper-auto-center t)
+(setq evil-jumper-file (concat dotemacs-cache-directory "evil-jumps"))
+(setq evil-jumper-auto-save-interval 120)
+(setq evil-jumper-max-length 10)
+(require 'evil-jumper)
+
+;; enable evil nerd commenter commenting, works in emacs mode and vim/evil mode
+(require 'evil-nerd-commenter)
+(evilnc-default-hotkeys)
+
+(require  'evil-numbers)
+(define-key evil-normal-state-map (kbd "C-<right>") 'evil-numbers/inc-at-pt)
+(define-key evil-normal-state-map (kbd "C-<left>") 'evil-numbers/dec-at-pt)
+
+(require 'powerline-evil)
+(powerline-evil-vim-theme)
+
+(require 'evil-matchit)
+(global-evil-matchit-mode 1)
+
+;;Make evil-mode up/down operate in screen lines instead of logical lines
+(define-key evil-normal-state-map (kbd "j") 'evil-next-visual-line)
+(define-key evil-normal-state-map (kbd "k") 'evil-previous-visual-line)
+
+(evil-set-initial-state 'magit-status-mode 'emacs)
+(evil-set-initial-state 'magit-log-edit-mode 'emacs)
+
+;;;;;;;;;;
+(provide 'init-evil)

config/init-evil.el

@@ -0,0 +1,106 @@
+(require-package 'evil-leader)
+(require-package 'key-chord)
+
+;; Emacs style
+
+;; Fast cursor movement in vertical direction with Meta.
+(global-set-key (kbd "M-n") (lambda () (interactive) (next-line 5)))
+(global-set-key (kbd "M-p") (lambda () (interactive) (previous-line 5)))
+
+(global-set-key (kbd "M-g") 'goto-line)
+(global-set-key (kbd "C-x C-b") 'buffer-menu)
+;; (global-set-key (kbd "C-a") 'mark-whole-buffer)
+(global-set-key (kbd "C-c C-p") 'projectile-find-file)
+(global-set-key (kbd "C-c C-f") 'projectile-grep)
+
+;; Shift <directional key> moves between windows
+(windmove-default-keybindings)
+
+;; Vim style
+(global-evil-leader-mode)
+(evil-leader/set-leader ",")
+
+;; use alternative/faster utilities than grep if found
+;; outside utilities need to be installed in bash with homebrew or apt-get or the packages directly
+;; pt, ag, and ack...grep is built into all unix systems
+(cond ((executable-find "pt")
+        (require-package 'pt) ;; https://github.com/bling/pt.el
+        (defalias 'my-search-util 'projectile-pt))  ;; seems pretty fast (faster than ag? maybe...dunno), but it's written in Go!
+      ((executable-find "ag")
+        (require-package 'ag) ;; https://github.com/Wilfred/ag.el
+        (defalias 'my-search-util 'projectile-ag))  ;; on the website, it said faster than ack
+      ((executable-find "ack")
+        (require-package 'ack-and-a-half) ;; https://github.com/jhelwig/ack-and-a-half
+        (defalias 'my-search-util 'projectile-ack))  ;; faster than grep
+      ((executable-find "grep")
+        (defalias 'my-search-util 'projectile-grep)))
+
+(evil-leader/set-key
+  "b" 'buffer-menu
+  "f" 'my-search-util
+  "l" 'linum-relative-toggle
+  "nf" 'neotree-find
+  "nt" 'neotree-toggle
+  "p" 'projectile-find-file
+  "r" 'recentf-open-files
+  "/" 'evilnc-comment-or-uncomment-lines
+  ;; "<down>" 'drag-stuff-down
+  ;; "<up>" 'drag-stuff-up
+)
+
+;; To do a multiple line select and drag up/down
+;; Do a total line select, with Capital V, and make sure
+;; that the cursor is in the upper left corner of the region
+;; then proceed to ctrl up/down the region
+;; (the above instructions preclude some odd behavior from
+;; happening for a multiselect drag up/down, whereas
+;; single line movement is just fine)
+(define-key evil-normal-state-map (kbd "C-<down>") 'drag-stuff-down)
+(define-key evil-normal-state-map (kbd "C-<up>") 'drag-stuff-up)
+
+(define-key evil-normal-state-map ":" 'smex)
+
+;; Bind DEL and = keys to scrolling up and down
+;; https://stackoverflow.com/questions/8483182/evil-mode-best-practice
+(define-key evil-normal-state-map (kbd "DEL") (lambda ()
+                    (interactive)
+                    (previous-line 10)
+                    (evil-scroll-line-up 10)
+                    ))
+
+(define-key evil-normal-state-map (kbd "=") (lambda ()
+                      (interactive)
+                      (next-line 10)
+                      (evil-scroll-line-down 10)
+                      ))
+
+;; press k j in rapid succesion to escape
+;; http://stackoverflow.com/questions/10569165/how-to-map-jj-to-esc-in-emacs-evil-mode
+(define-key evil-insert-state-map "k" #'cofi/maybe-exit)
+
+(evil-define-command cofi/maybe-exit ()
+  :repeat change
+  (interactive)
+  (let ((modified (buffer-modified-p)))
+    (insert "k")
+    (let ((evt (read-event (format "Insert %c to exit insert state" ?j)
+               nil 0.5)))
+      (cond
+       ((null evt) (message ""))
+       ((and (integerp evt) (char-equal evt ?j))
+    (delete-char -1)
+    (set-buffer-modified-p modified)
+    (push 'escape unread-command-events))
+       (t (setq unread-command-events (append unread-command-events
+                          (list evt))))))))
+
+;; Press jj in rapid succession to escape
+;; Whoa..two ways to do the same things, the above function and below with the key-chord-mode plugin
+(setq key-chord-two-keys-delay 0.2)
+;; from http://bbbscarter.wordpress.com/category/coding/emacs/
+(key-chord-mode 1)
+(setq key-chord-two-keys-delay 0.2)
+(key-chord-define evil-insert-state-map "jj" 'evil-normal-state)
+
+;;;;;;;;;;
+(provide 'init-keybindings)