diff options
| -rw-r--r-- | README.md | 26 | ||||
| -rw-r--r-- | emacs/gtkrc | 5 | ||||
| -rw-r--r-- | emacs/init.el | 382 |
3 files changed, 407 insertions, 6 deletions
@@ -8,11 +8,25 @@ a submodule). Vim plugins will also get installed automatically. And that's about it. Use this at your own risk ;) +## Runtime dependencies + +There are some runtime dependencies that matter to either Vim or Emacs. In +openSUSE (probably similar in your distribution) they can be solved like this: + +``` +$ go get -u golang.org/x/tools/cmd/goimports +$ go get -u github.com/rogpeppe/godef +$ go get -u github.com/dougm/goflymake +$ go get -u github.com/nsf/gocode +$ sudo zypper in spell +``` + ## License -Everything except the `bin` directory is licensed under the MIT/X11 license, -since these files are mere configuration files. You can find the full license -in the `LICENSE` file and below: +Everything except the `bin` directory and any Emacs Lisp file is licensed under +the MIT/X11 license, since these files are mere configuration files that I want +to keep simple in regards to licensing. You can find the full license in the +`LICENSE` file and below: ``` Copyright (c) 2011-2016 Miquel Sabaté Solà @@ -37,9 +51,9 @@ OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. ``` -The files under the `bin` directory are licensed under the GPLv3 (or at your -option any later version). The license itself can be found in the -`LICENSE.gpl3` file, and the header of it is as follows: +The files under the `bin` directory and all Emacs Lisp files are licensed under +the GPLv3 (or at your option any later version). The license itself can be +found in the `LICENSE.gpl3` file, and the header of it is as follows: ``` Copyright (C) 2014-2016 Miquel Sabaté Solà <mikisabate@gmail.com> diff --git a/emacs/gtkrc b/emacs/gtkrc new file mode 100644 index 0000000..19d2109 --- /dev/null +++ b/emacs/gtkrc @@ -0,0 +1,5 @@ +style "emacsfont" +{ + font_name = "Droid Sans Mono Dotted for Powerline 10" +} +widget "*" style "emacsfont" diff --git a/emacs/init.el b/emacs/init.el new file mode 100644 index 0000000..5f98d28 --- /dev/null +++ b/emacs/init.el @@ -0,0 +1,382 @@ +;;; init.el --- My Emacs configuration + +;; Copyright (C) 2016 Miquel Sabaté Solà <mikisabate@gmail.com> +;; +;; This program is free software: you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. +;; +;; This program is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. +;; +;; You should have received a copy of the GNU General Public License +;; along with this program. If not, see <http://www.gnu.org/licenses/>. + +;;; Commentary: +;; +;; This is my personal Emacs configuration. I wouldn't expect much to be +;; honest :) + +;;; Credits: +;; +;; I've built this file by simply scavenging from other people's +;; emacs.d/dotfiles repositories. I have taken lots of pieces from here and +;; there, but most notably: +;; - @ereslibre: https://github.com/ereslibre/dotfiles +;; - @dmacvicar: https://github.com/dmacvicar/dotfiles +;; - @bbatsov: https://github.com/bbatsov/emacs.d +;; - @aaronbieber: https://github.com/aaronbieber/dotfiles + +;;; Code: + +;; I'm sticking with the major version I'm using, deal with it. +(unless (>= emacs-major-version 24) + (error "Don't be a cheap bastard and upgrade to at least Emacs 24")) + +;; Initialize 'package +(require 'package) + +(add-to-list 'package-archives + '("melpa" . "http://melpa.milkbox.net/packages/") t) +(add-to-list 'package-archives + '("melpa-stable" . "https://stable.melpa.org/packages/") t) + +(package-initialize) + +;; UTF-8 *always*. +(prefer-coding-system 'utf-8) +(set-default-coding-systems 'utf-8) +(set-terminal-coding-system 'utf-8) +(set-keyboard-coding-system 'utf-8) + +;; User name and email. +(setq user-full-name "Miquel Sabaté Solà" + user-mail-address "mikisabate@gmail.com") + +;; Calendar +(defvar calendar-week-start-day 1) + +;; No welcome screen +(setq-default inhibit-startup-message t) + +;; Enable y/n answers +(fset 'yes-or-no-p 'y-or-n-p) + +;; The frame title is "mssola: <path>". If we are not editing a file, then the +;; name of the buffer is displayed (e.g. "mssola: *scratch*"). +(setq frame-title-format + '((:eval + (if (buffer-file-name) + (concat + (user-real-login-name) + ": " + (abbreviate-file-name (buffer-file-name))) + "mssola: %b")))) + +;; Emacs modes typically provide a standard means to change the indentation +;; width (e.g. c-basic-offset). Moreover, even though I prefer tabs over space, +;; for most coding conventions this is not the case (e.g. ruby). For this +;; reason, I will disable them by default and enabled them back for each +;; specific case (e.g. C). I'm also using the smart-tabs-mode package, see +;; below in the languages section. +(setq-default indent-tabs-mode nil) +(setq-default tab-width 4) + +;; Delete the selection with a keypress. +(delete-selection-mode t) + +;; Revert buffers automatically when underlying files are changed externally +(global-auto-revert-mode t) + +;; Do not break lines +(set-default 'truncate-lines t) + +;; No backups +(setq-default make-backup-files nil) +(setq-default auto-save-default nil) + +;; Nice scrolling +(setq scroll-margin 0 + scroll-conservatively 100000 + scroll-preserve-screen-position 1) + +;; Remove whitespaces at the end of line +(add-hook 'before-save-hook 'delete-trailing-whitespace) + +;; Graphical interface tweaks +(menu-bar-mode -1) +(tool-bar-mode -1) +(scroll-bar-mode -1) + +;; Lines and columns +(line-number-mode 1) +(column-number-mode 1) + +;; Cursor +(blink-cursor-mode 0) +(global-hl-line-mode -1) + +;; Follow symlinks +(setq vc-follow-symlinks t) + +;; Default theme +(load-theme 'soria t) + +;; Default font + +(set-frame-font "Droid Sans Mono Dotted for Powerline-10") +(add-to-list 'default-frame-alist '(font . "Droid Sans Mono Dotted for Powerline-10")) +(set-face-attribute 'default t :font "Droid Sans Mono Dotted for Powerline-10") + +;; Disable C-z. It will later on be picked up by Evil's config as the escape +;; sequence. This is here to make sure that it will be disabled even if Evil +;; cannot be loaded due to some error. +(global-unset-key (kbd "C-z")) + +;; Let flyspell be performant. +(defvar flyspell-issue-message-flag nil) + +;;; Packages + +;; I'm using use-package to handle my installed packages. I don't know if it's +;; the best option or what because I haven't tested all the package managers +;; for Emacs out there. After trying some custom functions to handle +;; package-install, I decided on use-package because I feel more well-organized. +(unless (package-installed-p 'use-package) + (package-install 'use-package)) + +(require 'use-package) +(setq use-package-verbose t) + +;; Ayo silver! +(use-package ag + :ensure t + :config + (add-hook 'ag-mode-hook + (lambda () + (define-key ag-mode-map (kbd "n") 'evil-search-next) + (define-key ag-mode-map (kbd "N") 'evil-search-previous) + (define-key ag-mode-map (kbd "gg") 'evil-goto-first-line))) + (setq ag-reuse-buffers t) + (setq ag-reuse-window t)) + +;; Flycheck + +(use-package let-alist + :ensure t) + +(use-package flycheck + :ensure t + :config + (add-hook 'after-init-hook 'global-flycheck-mode) + + ;; Only show the errors buffer if it isn't there and if I'm saving the + ;; buffer. + (setq flycheck-emacs-lisp-load-path 'inherit) + (setq flycheck-check-syntax-automatically '(mode-enabled save)) + (setq flycheck-display-errors-function + #'flycheck-display-error-messages-unless-error-list)) + +;; Projectile & Helm + +(use-package projectile + :ensure t + :config + (projectile-global-mode +1) + (setq projectile-mode-line + '(:eval (format " %s" (projectile-project-name)))) +) + +(use-package helm + :ensure t + :config + (setq projectile-completion-system 'helm)) + +(use-package helm-projectile + :ensure t + :config + (helm-projectile-on)) + +;; Rising from the deep flames of Hell: my Evil configuration. +;; TODO: evil mode also in backtraces +;; TODO: evil mode also in documentation +;; TODO: evil mode also in calendar +;; TODO: evil mode also in helm's find-file + +(defun mssola-evil () + "Configure evil mode." + + ; We can safely remap <C-u> because the counting will be handled a-la Vim. + (define-key evil-normal-state-map (kbd "C-u") 'evil-scroll-up) + + ; Make window navigation easier. + (define-key evil-normal-state-map (kbd "C-j") 'evil-window-down) + (define-key evil-normal-state-map (kbd "C-k") 'evil-window-up) + (define-key evil-normal-state-map (kbd "C-l") 'evil-window-right) + (define-key evil-normal-state-map (kbd "C-h") 'evil-window-left) + + ; The window navigation tweaks effectively wipe out the help prefix, which + ; is bad. Fortunately we can workaround this by providing "M-h" as the new + ; help prefix. This prefix is only used in emacs mode to mark lines, which is + ; something already handled by Evil. + (define-key global-map (kbd "M-h") 'help-command) + (fset 'help-command help-map) + + ; Helm + Projectile shortcuts. + (define-key evil-normal-state-map (kbd "C-p") 'helm-projectile-find-file) + (define-key evil-normal-state-map (kbd "M-p") 'helm-projectile-switch-project) + + ; I store macros on the <q> register for convenience, so let's also use the + ; <C-q> combo to execute the macro. + ; TODO: not really working + (define-key evil-normal-state-map (kbd "C-q") + (lambda () (interactive) (evil-execute-macro 1 'q))) + + ; C-s: switch to normal mode and save the buffer. I know :) + (define-key evil-normal-state-map (kbd "C-s") 'save-buffer) + (define-key evil-insert-state-map (kbd "C-s") + (lambda () (interactive) (save-buffer) (evil-force-normal-state)))) + +(use-package evil + :ensure t + :config + (add-hook 'evil-mode-hook 'mssola-evil) + (evil-mode 1) + + ;; C-z is unused and it's close to my beloved C-c. Since I don't want to mess + ;; with one of the most sacred Emacs prefixes, I'm moving to C-z. + (define-key key-translation-map (kbd "C-z") [escape]) + (define-key evil-operator-state-map (kbd "C-z") 'keyboard-quit) + (set-quit-char "C-z") + + ;; Use insert mode by default on the following modes. + (dolist (mode '(twittering-edit-mode)) + (add-to-list 'evil-insert-state-modes mode)) + + (use-package evil-leader + :ensure t + :config + (global-evil-leader-mode) + (evil-leader/set-leader ",") + (setq evil-leader/in-all-states 1) + (evil-leader/set-key + "," 'back-to-indentation + "c" 'delete-window + "v" 'split-window-right + "V" (lambda () (interactive) (split-window-right) (other-window 1)) + "f" 'flycheck-list-errors + "e" 'eval-last-sexp)) + + (use-package evil-surround + :ensure t + :config + (global-evil-surround-mode 1))) + +;; I heard you could have Twitter in Emacs, so let's roll with it. +(use-package twittering-mode + :ensure t + :commands twit + :config + (setq twittering-use-master-password t) + (setq twittering-use-native-retweet t) + (setq twittering-icon-mode t) + (setq twittering-use-icon-storage t) + + ; Let's use the <leader> key to perform the actions that I use more often. + (add-hook 'twittering-mode-hook + (lambda () + (evil-leader/set-key + "t" 'twittering-update-status-interactive ; Tweet + "q" 'twittering-retweet ; Quote + "r" 'twittering-native-retweet ; Retweet + "f" 'twittering-favorite))) ; Fav + + ; Activate flyspell mode when tweeting and added the <leader>c shortcut to + ; cancel sending a tweet. + (add-hook 'twittering-edit-mode-hook + (lambda () + (flyspell-mode 1)) + (evil-leader/set-key + "c" 'twittering-edit-cancel-status))) + +;;; Programming languages. + +(defun warnings-mode-hook () + "Hook for enabling the warning face on strings with a warning prefix." + + (font-lock-add-keywords nil + '(("\\(XXX\\|FIXME\\|TODO\\|HACK\\|NOTE\\)" + 1 font-lock-warning-face prepend)))) + +;; Text mode. +(add-hook 'text-mode-hook (lambda () (flyspell-mode 1))) + +;; Emacs Lisp mode +(add-hook 'emacs-lisp-mode-hook 'eldoc-mode) + +;; C-common (it includes languages with a similar syntax of C). +(add-hook 'c-mode-common-hook 'warnings-mode-hook) +(add-hook 'c-mode-common-hook (lambda() (flyspell-prog-mode))) + +;; C +(add-hook 'c-mode-hook + (lambda () (setq indent-tabs-mode t))) + +;; C++ +(add-hook 'c++-mode-hook + (lambda () (setq indent-tabs-mode t))) + +(defun mssola-go-mode () + "My configuration for Go mode." + + (require 'go-mode-autoloads) + + ; Use goimports instead of go-fmt + (setq gofmt-command "goimports") + + ; Call Gofmt before saving + (add-hook 'before-save-hook 'gofmt-before-save) + + ; Integration flycheck with Go + (add-to-list 'load-path + (concat (getenv "GOPATH") "/src/github.com/dougm/goflymake")) + (require 'go-flycheck) + + (evil-leader/set-key + "." 'godef-jump-other-window) + + ; TODO: yasnippet + + ; eldoc support + (use-package go-eldoc + :ensure t + :config + (require 'go-eldoc))) + +;; Go +(use-package go-mode + :ensure t + :pin melpa-stable + :config + (mssola-go-mode)) + +(add-hook 'go-mode-hook 'warnings-mode-hook) +(add-hook 'go-mode-hook 'go-eldoc-setup) +(add-hook 'go-mode-hook + (lambda () + (setq indent-tabs-mode t) + (flyspell-prog-mode))) + +;; Smart tabs +(use-package smart-tabs-mode + :ensure t + :config + (smart-tabs-add-language-support golang go-mode-hook + ((c-indent-line . c-basic-offset) + (c-indent-region . c-basic-offset))) + (smart-tabs-insinuate 'c 'c++ 'golang)) + +;;; init.el ends here |