dotfiles

config files and scripts at HOME.
git clone git://git.ricketyspace.net/dotfiles.git
Log | Files | Refs

commit 0ad897cea09980e772dfbf3ea66af292b8bb2250
parent 957c329d0d23d468362a3aaa50dc67df090a04d4
Author: rsiddharth <rsiddharth@ninthfloor.org>
Date:   Mon, 30 May 2016 00:57:41 +0000

.emacs: moved things around.

- add:
   .emacs.d/lisp/rsd-disable.el
   .emacs.d/lisp/rsd-enable.el
   .emacs.d/lisp/rsd-pkgs.el
   .emacs.d/lisp/rsd-startup.el
   .emacs.d/lisp/rsd-text.el

Diffstat:
.emacs | 142+++----------------------------------------------------------------------------
.emacs.d/lisp/rsd-disable.el | 31+++++++++++++++++++++++++++++++
.emacs.d/lisp/rsd-enable.el | 25+++++++++++++++++++++++++
.emacs.d/lisp/rsd-pkgs.el | 115+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
.emacs.d/lisp/rsd-startup.el | 22++++++++++++++++++++++
.emacs.d/lisp/rsd-text.el | 33+++++++++++++++++++++++++++++++++
6 files changed, 231 insertions(+), 137 deletions(-)

diff --git a/.emacs b/.emacs @@ -18,143 +18,11 @@ (setq user-full-name "rsiddharth") (setq user-mail-address "rsiddharth@ninthfloor.org") -;; startup -(setq inhibit-startup-screen t) -(setq initial-buffer-choice "~/v/git/rsd/notes/scratchpad.org") -(setq initial-scratch-message ";; 42") - -;; disable things -(dolist (mode '(tool-bar-mode - scroll-bar-mode - blink-cursor-mode - menu-bar-mode)) - (when (fboundp mode) (funcall mode -1))) - -;; stop cursor blinking in urxvt -(setq visible-cursor nil) -;; fix zsh prompt -(setq system-uses-terminfo nil) - -;; enable things -(dolist (mode '(column-number-mode)) - (when (fboundp mode) (funcall mode 1))) - -;; enable narrow-to-region -(put 'narrow-to-region 'disabled nil) - -;; tabs and spacing -(setq tab-width 4) -(setq-default indent-tabs-mode nil) - -;; utf-8 -;; from cwebber's -;; repo: git://github.com/cwebber/cwebbers-emacs-config -;; file: /general.el [line 380] -;; commit: 3253f24453b81eff2e86d3e2567dfc74473ee525 -(prefer-coding-system 'utf-8) -(set-default-coding-systems 'utf-8) -(set-terminal-coding-system 'utf-8) -(set-keyboard-coding-system 'utf-8) - -;; font -(add-to-list 'default-frame-alist '(font . "DejaVu Sans Mono 10")) - -;; melpa -(require 'package) -(add-to-list 'package-archives - '("melpa" . "http://melpa.org/packages/")) -(package-initialize) - -;; use-package -(unless (package-installed-p 'use-package) - (package-refresh-contents) - (package-install 'use-package)) - -;; server -(use-package server - :config - (unless (server-running-p) - (server-start))) - -;; org -(use-package org - :mode ("\\.org\\'" . org-mode) - :config - (add-hook 'org-mode-hook 'turn-on-font-lock) - (setq org-agenda-files "~/.emacs.d/agenda.org") - (setq org-log-done 'time) - :bind (("\C-cl" . org-store-link) - ("\C-ca" . org-agenda) - ("\C-cb" . org-iswitchb))) - -;; bookmarks -(use-package bookmark - :config - (setq bookmark-default-file "~/.emacs.d/bookmarks.el") - (setq bookmark-save-flag 1)) - -(use-package tex :ensure auctex) -(use-package jinja2-mode :ensure t) -(use-package markdown-mode :ensure t) -(use-package web-mode :ensure t) - -;; auto-complete mode. -(use-package auto-complete - :ensure t - :config - (ac-config-default)) - -;; helm -(use-package helm - :ensure t - :config - (require 'helm-config) - (helm-mode 1) - (helm-autoresize-mode t) - (unbind-key "C-x c") - :bind (("C-c h" . helm-command-prefix) - ("M-x" . helm-M-x) - ("M-y" . helm-show-kill-ring) - ("C-x b" . helm-mini) - ("C-x C-f" . helm-find-files) - :map helm-map - ("[tab]" . helm-execute-persistent-action) - ("C-i". helm-execute-persistent-action) - ("C-z" . helm-select-action))) - -;; magit -(use-package magit - :ensure t - :bind (("C-x g" . magit-status) - ("C-x M-g" . magit-dispatch-popup))) - -;; geiser -(use-package geiser-guile - :init - (setq-default guile-load-paths '("~/v/git/rsd/sicp" - "~/v/git/rsd/sandbox/guile")) - :config - (setq geiser-active-implementations '(guile)) - (mapc (lambda (path) (add-to-list 'geiser-guile-load-path path)) - guile-load-paths)) - -;; paredit -(use-package paredit - :ensure t - :init - (setq-default rsd/paredit-modes '(emacs-lisp-mode-hook - lisp-mode-hook - lisp-interaction-mode-hook - scheme-mode-hook)) - :config - (mapc (lambda (mode) (add-hook mode 'enable-paredit-mode)) - rsd/paredit-modes)) - -;; git-annex -(use-package git-annex - :ensure t - :config - (setq git-annex-commit nil)) +(add-to-list 'load-path (expand-file-name "~/.emacs.d/lisp")) +(require 'rsd-startup) +(require 'rsd-disable) +(require 'rsd-enable) +(require 'rsd-pkgs) ;; custom (setq custom-file "~/.emacs.d/custom.el") diff --git a/.emacs.d/lisp/rsd-disable.el b/.emacs.d/lisp/rsd-disable.el @@ -0,0 +1,31 @@ +;; rsd-disable.el -- disable/fix things. +;; +;; Copyright © 2015-2016 rsiddharth <s@ricketyspace.net> +;; +;; 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. +;; +;; Full text of the GNU General Public License is available at +;; <https://gnu.org/licenses/gpl.html>. + +;; disable +(dolist (mode '(tool-bar-mode + scroll-bar-mode + blink-cursor-mode + menu-bar-mode)) + (when (fboundp mode) (funcall mode -1))) + +;; stop cursor blinking in urxvt +(setq visible-cursor nil) + +;; fix zsh prompt +(setq system-uses-terminfo nil) + +(provide 'rsd-disable) diff --git a/.emacs.d/lisp/rsd-enable.el b/.emacs.d/lisp/rsd-enable.el @@ -0,0 +1,25 @@ +;; rsd-enable.el -- enable things. +;; +;; Copyright © 2015-2016 rsiddharth <s@ricketyspace.net> +;; +;; 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. +;; +;; Full text of the GNU General Public License is available at +;; <https://gnu.org/licenses/gpl.html>. + +;; enable +(dolist (mode '(column-number-mode)) + (when (fboundp mode) (funcall mode 1))) + +;; enable narrow-to-region +(put 'narrow-to-region 'disabled nil) + +(provide 'rsd-enable) diff --git a/.emacs.d/lisp/rsd-pkgs.el b/.emacs.d/lisp/rsd-pkgs.el @@ -0,0 +1,115 @@ +;; rsd-pkgs.el -- install/customize packages. +;; +;; Copyright © 2015-2016 rsiddharth <s@ricketyspace.net> +;; +;; 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. +;; +;; Full text of the GNU General Public License is available at +;; <https://gnu.org/licenses/gpl.html>. + +;; melpa +(require 'package) +(add-to-list 'package-archives + '("melpa" . "http://melpa.org/packages/")) +(package-initialize) + +;; use-package +(unless (package-installed-p 'use-package) + (package-refresh-contents) + (package-install 'use-package)) + +;; server +(use-package server + :config + (unless (server-running-p) + (server-start))) + +;; org +(use-package org + :mode ("\\.org\\'" . org-mode) + :config + (add-hook 'org-mode-hook 'turn-on-font-lock) + (setq org-agenda-files "~/.emacs.d/agenda.org") + (setq org-log-done 'time) + :bind (("\C-cl" . org-store-link) + ("\C-ca" . org-agenda) + ("\C-cb" . org-iswitchb))) + +;; bookmarks +(use-package bookmark + :config + (setq bookmark-default-file "~/.emacs.d/bookmarks.el") + (setq bookmark-save-flag 1)) + +(use-package tex :ensure auctex) +(use-package jinja2-mode :ensure t) +(use-package markdown-mode :ensure t) +(use-package web-mode :ensure t) + +;; auto-complete mode. +(use-package auto-complete + :ensure t + :config + (ac-config-default)) + +;; helm +(use-package helm + :ensure t + :config + (require 'helm-config) + (helm-mode 1) + (helm-autoresize-mode t) + (unbind-key "C-x c") + :bind (("C-c h" . helm-command-prefix) + ("M-x" . helm-M-x) + ("M-y" . helm-show-kill-ring) + ("C-x b" . helm-mini) + ("C-x C-f" . helm-find-files) + :map helm-map + ("[tab]" . helm-execute-persistent-action) + ("C-i". helm-execute-persistent-action) + ("C-z" . helm-select-action))) + +;; magit +(use-package magit + :ensure t + :bind (("C-x g" . magit-status) + ("C-x M-g" . magit-dispatch-popup))) + +;; geiser +(use-package geiser-guile + :init + (setq-default guile-load-paths '("~/v/git/rsd/sicp" + "~/v/git/rsd/sandbox/guile")) + :config + (setq geiser-active-implementations '(guile)) + (mapc (lambda (path) (add-to-list 'geiser-guile-load-path path)) + guile-load-paths)) + +;; paredit +(use-package paredit + :ensure t + :init + (setq-default rsd/paredit-modes '(emacs-lisp-mode-hook + lisp-mode-hook + lisp-interaction-mode-hook + scheme-mode-hook)) + :config + (mapc (lambda (mode) (add-hook mode 'enable-paredit-mode)) + rsd/paredit-modes)) + +;; git-annex +(use-package git-annex + :ensure t + :config + (setq git-annex-commit nil)) + +(provide 'rsd-pkgs) diff --git a/.emacs.d/lisp/rsd-startup.el b/.emacs.d/lisp/rsd-startup.el @@ -0,0 +1,22 @@ +;; rsd-startup.el -- customize emacs startup. +;; +;; Copyright © 2015-2016 rsiddharth <s@ricketyspace.net> +;; +;; 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. +;; +;; Full text of the GNU General Public License is available at +;; <https://gnu.org/licenses/gpl.html>. + +(setq inhibit-startup-screen t) +(setq initial-buffer-choice "~/v/git/rsd/notes/scratchpad.org") +(setq initial-scratch-message ";; 42") + +(provide 'rsd-startup) diff --git a/.emacs.d/lisp/rsd-text.el b/.emacs.d/lisp/rsd-text.el @@ -0,0 +1,33 @@ +;; rsd-text.el -- utf-8, spacing, font, etc. +;; +;; Copyright © 2015-2016 rsiddharth <s@ricketyspace.net> +;; +;; 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. +;; +;; Full text of the GNU General Public License is available at +;; <https://gnu.org/licenses/gpl.html>. + +;; tabs and spacing +(setq tab-width 4) +(setq-default indent-tabs-mode nil) + +;; utf-8 +;; from cwebber's +;; repo: git://github.com/cwebber/cwebbers-emacs-config +;; file: /general.el [line 380] +;; commit: 3253f24453b81eff2e86d3e2567dfc74473ee525 +(prefer-coding-system 'utf-8) +(set-default-coding-systems 'utf-8) +(set-terminal-coding-system 'utf-8) +(set-keyboard-coding-system 'utf-8) + +;; font +(add-to-list 'default-frame-alist '(font . "DejaVu Sans Mono 10"))