5FLRDDUAB7NCOKJKK57IVQBETGX7JTT7GVKFT46ORSZ7OJ7Q2UFQC IUA6MCZWWCFQ4EJ4GBWYAPLM4IE7SFB34CGSJJTBVOAFTSL4EDEAC RXCY7LD6ZRIOIKZEYKLMCYPMQPXF4DOEEFBDLVR2B22BXLZJFFBQC A3TVGLVHSVLMEHLHB3TPBSD3QGNVGX3DIK6BEBDTTHWBNW4ALMRAC HGGMS7P6BRIGWP6DZS3KLRXQPRETMB2GUULCQZAED6IYD5ENK2DQC IOVPOFAVXEQIZ7BCFVVAWFW3RYFXPK2GOILDWA6N6QHQHLAJ4XTAC PZ5HUCRXCTUXIKAFUFDGMVSZVV4MIDZ2EE7OC3TBZTTQ7HZCMUYAC ABDQA6HCTOUQXY5IDGDTCDBR5DA2WAHUWHBS5EIRYNUJNQCM6GOQC QHGU5YX5J6OFWM2QH6ZVCMW5J4MVPPK5JGESEYKJZXFN2NEYQOCQC NWXFEA3LHLS5YE6BUVB2IXMIA6ARTVH5PU3FD4I4M5UCDYMC6INAC NLKO2HJ55FV76MQCUCSJBSSZFI4NK6ROLQ323F2RDFDTLU5IFLDQC DZNNVEMP3EYFGAEFWMBSMPU55VQT7QVAVNNOG473CN3FAT4TTARQC YZB5M5LUC7P6UJQTLIX45W4EDXOT4PUXQ4J5UEELFXWQTW2XTB2QC XJLV3OIIPQ6V6YHJGFI7RRDYI5MXTXCXSVKPOZFUOGMV4B2DEJSQC 77GFHLOOX3JBBHHHSSR7TFOMOFUCIT5P6A7PQQOVNCZULXKMERMAC ZIZORUH6UNA67S6DRRGGCTSOCYENTHGODHJ5JP3UUPLIKGYU5UVAC (defmacro defparedit-wrapper (name invoked-wrapper)`(defun ,name ()(interactive)(paredit-wiggle-back)(,invoked-wrapper)))
(comment(defun paredit-wiggle-back ()(paredit-forward)(paredit-backward))(defmacro defparedit-wrapper (name invoked-wrapper)`(defun ,name ()(interactive)(paredit-wiggle-back)(,invoked-wrapper))))
(defun load-package-configuration (package)(load (concat "~/.emacs.d/lisp/configurations/"(symbol-name package)".el")))(defmacro ensure-use-packages (&rest packages)(list* 'progn(mapcar (lambda (pck)`(use-package ,(car pck):ensure t,@(cdr pck)))packages)))
(defun do-init ();;;;; INDENTATION SETUP {{{(progn(setq-default indent-tabs-mode niltab-width 2)(defvaralias 'c-basic-offset 'tab-width)(defvaralias 'sh-basic-offset 'tab-width)(defvaralias 'js2-basic-offset 'tab-width)(defvaralias 'sgml-basic-offset 'tab-width)(defvaralias 'cperl-indent-level 'tab-width));;;;; }}}
;;(let ((file-name-handler-alist nil))
;; (require 'projectile);; (require 'evil-numbers)(unless (fboundp 'server-running-p)(require 'server))(let ((server-name (if fwoar.is-ordinaryserver-name"notes")))(unless (server-running-p)(server-start)))(projectile-mode)(evil-mode);; (paredit-mode);;(global-company-mode);; (setq linum-format "%5d\u2502")(global-linum-mode)(set-exec-path-from-shell-PATH);; NOTE: this must be here...(global-company-mode 1)(slime-setup))
(add-hook 'after-init-hook(lambda ();; (require 'projectile);; (require 'evil-numbers)(unless (fboundp 'server-running-p)(require 'server))(let ((server-name (if fwoar.is-ordinaryserver-name"notes")))(unless (server-running-p)(server-start)))(projectile-mode)(evil-mode)(paredit-mode);;(global-company-mode);; (setq linum-format "%5d\u2502")(global-linum-mode)(set-exec-path-from-shell-PATH);; NOTE: this must be here...(slime-setup)(global-company-mode 1)))
(add-hook 'after-init-hook 'do-init)
;(use-package erc; :config; (add-hook 'erc-insert-post-hook 'erc-truncate-buffer))(use-package evil:ensure t:config(advice-add 'evil-delete-marks :after(lambda (&rest args)(evil-visual-mark-render)))(define-key evil-normal-state-map " o" 'slime-selector)(define-key evil-insert-state-map (kbd "TAB") 'company-indent-or-complete-common)(evil-mode)(use-package evil-paredit:ensure t:after paredit:config(evil-paredit-mode))
;;(use-package evil-numbers;; :ensure t;; :config;; (global-set-key (kbd "C-c +") 'evil-numbers/inc-at-pt);; (global-set-key (kbd "C-c -") 'evil-numbers/dec-at-pt))(use-package evil-surround:ensure t:config(global-evil-surround-mode))(use-package evil-leader:ensure t:config(global-evil-leader-mode)(evil-leader/set-leader ",")))
(setq org-directory "~/org")(setq org-default-notes-file (concat org-directory "/scratch.org"))
(setq org-directory "~/org"org-default-notes-file (concat org-directory "/scratch.org")org-refile-use-outline-path 'fileorg-outline-path-complete-in-steps nilorg-capture-templates '(("t" "Todo" entry (file+headline "~/org/gtd.org" "Tasks")"* TODO %?\n %i\n %a")("j" "Journal" entry (file+olp+datetree "~/org/journal.org")"* %?\nEntered on %U\n %i\n %a")("s" "Snippet" entry (file "~/org/snippets.org")"* %?\n#+BEGIN_SRC\n%i\n#+END_SRC")("b" "Bookmarks" entry (file+olp+datetree "~/org/bookmarks.org")"* %? %^g\n%c\n"))org-refile-targets '((nil . (:maxlevel . 2))))
(setq org-capture-templates'(("t" "Todo" entry (file+headline "~/org/gtd.org" "Tasks")"* TODO %?\n %i\n %a")("j" "Journal" entry (file+olp+datetree "~/org/journal.org")"* %?\nEntered on %U\n %i\n %a")("s" "Snippet" entry (file "~/org/snippets.org")"* %?\n#+BEGIN_SRC\n%i\n#+END_SRC")("b" "Bookmarks" entry (file+olp+datetree "~/org/bookmarks.org")"* %? %^g\n%c\n")))
;;;;; INDENTATION SETUP {{{(progn(setq-default indent-tabs-mode niltab-width 2)(defvaralias 'c-basic-offset 'tab-width)(defvaralias 'sh-basic-offset 'tab-width)(defvaralias 'js2-basic-offset 'tab-width)(defvaralias 'sgml-basic-offset 'tab-width)(defvaralias 'cperl-indent-level 'tab-width));;;;; }}}
(add-hook 'cider-mode-hook 'rainbow-delimiters-mode)(add-hook 'cider-mode-hook 'evil-paredit-mode)(add-hook 'cider-mode-hook 'paredit-mode)
(evil-define-key 'normal clojure-mode-map " '" 'helm-cider-apropos)(evil-define-key 'normal clojure-mode-map " o" 'cider-selector)(evil-define-key 'normal cider-repl-mode-map " o" 'cider-selector)(add-hook 'cider-mode-hook(lambda ()(rainbow-delimiters-mode);; (evil-paredit-mode);; (paredit-mode)(aggressive-indent-mode)(helm-cider-mode)))
(progn ; helm(require 'helm-config)(helm-mode)(global-set-key (kbd "C-x C-f") 'helm-find-files)(define-key evil-normal-state-map " f" 'helm-projectile)(define-key evil-normal-state-map " j" 'helm-buffers-list)(define-key evil-normal-state-map " s" 'helm-occur)(global-set-key (kbd "M-x") 'helm-M-x))(use-package paredit:ensure t:config(defparedit-wrapper back-then-wrap paredit-wrap-sexp)(defparedit-wrapper back-then-wrap-square paredit-wrap-square)(defparedit-wrapper back-then-wrap-curly paredit-wrap-curly)(defparedit-wrapper back-then-wrap-angled paredit-wrap-angled)(defparedit-wrapper back-then-wrap-doublequote paredit-meta-doublequote)(define-key evil-normal-state-map ",W" 'back-then-wrap)(define-key evil-normal-state-map ",w]" 'back-then-wrap-square)(define-key evil-normal-state-map ",w}" 'back-then-wrap-curly)(define-key evil-normal-state-map ",w>" 'back-then-wrap-angled)(define-key evil-normal-state-map ",w\"" 'back-then-wrap-doublequote)
(progn ; helm(require 'helm-config)(helm-mode)(global-set-key (kbd "C-x C-f") 'helm-find-files)(define-key evil-normal-state-map " f" 'helm-projectile)(define-key evil-normal-state-map " j" 'helm-buffers-list)(define-key evil-normal-state-map " s" 'helm-occur)(global-set-key (kbd "M-x") 'helm-M-x))
(define-key evil-normal-state-map ",S" 'paredit-splice-sexp)(define-key evil-normal-state-map ",A" 'paredit-splice-sexp-killing-backward)(define-key evil-normal-state-map ",D" 'paredit-splice-sexp-killing-forward)(define-key evil-normal-state-map ",|" 'paredit-split-sexp)(define-key evil-normal-state-map ",J" 'paredit-join-sexps)(define-key evil-normal-state-map ",<" 'paredit-backward-slurp-sexp)(define-key evil-normal-state-map ",," 'paredit-backward-barf-sexp)(define-key evil-normal-state-map ",>" 'paredit-forward-slurp-sexp)(define-key evil-normal-state-map ",." 'paredit-forward-barf-sexp)(define-key evil-normal-state-map ",~" 'paredit-convolute-sexp))
;; (use-package ansi-term :no-require t;; :config;; (eval-after-load 'evil;; (evil-set-initial-state 'term-mode 'emacs)));; (defun ansi-term-post (&rest r);; (message "Loading ansi term...");; (evil-set-initial-state 'term-mode 'emacs));; (advice-add 'ansi-term :after 'ansi-term-post)
;; (use-package org-brain :ensure t;; :init;; (setq org-brain-path "~/org-brain/");;;; :config;; ;; For Evil users;; (eval-after-load 'evil;; (evil-set-initial-state 'org-brain-visualize-mode 'emacs));;;; (setq org-id-track-globally t);; (setq org-id-locations-file "~/.emacs.d/.org-id-locations");; (push '("b" "Brain" plain (function org-brain-goto-end);; "* %i%?" :empty-lines 1);; org-capture-templates);; (setq org-brain-visualize-default-choices 'all);; (setq org-brain-title-max-length 12))
;;;;; junk drawer ....(comment(use-package paredit:ensure t:config(defparedit-wrapper back-then-wrap paredit-wrap-sexp)(defparedit-wrapper back-then-wrap-square paredit-wrap-square)(defparedit-wrapper back-then-wrap-curly paredit-wrap-curly)(defparedit-wrapper back-then-wrap-angled paredit-wrap-angled)(defparedit-wrapper back-then-wrap-doublequote paredit-meta-doublequote)(define-key evil-normal-state-map ",W" 'back-then-wrap)(define-key evil-normal-state-map ",w]" 'back-then-wrap-square)(define-key evil-normal-state-map ",w}" 'back-then-wrap-curly)(define-key evil-normal-state-map ",w>" 'back-then-wrap-angled)(define-key evil-normal-state-map ",w\"" 'back-then-wrap-doublequote)(define-key evil-normal-state-map ",S" 'paredit-splice-sexp)(define-key evil-normal-state-map ",A" 'paredit-splice-sexp-killing-backward)(define-key evil-normal-state-map ",D" 'paredit-splice-sexp-killing-forward)(define-key evil-normal-state-map ",|" 'paredit-split-sexp)(define-key evil-normal-state-map ",J" 'paredit-join-sexps)(define-key evil-normal-state-map ",<" 'paredit-backward-slurp-sexp)(define-key evil-normal-state-map ",," 'paredit-backward-barf-sexp)(define-key evil-normal-state-map ",>" 'paredit-forward-slurp-sexp)(define-key evil-normal-state-map ",." 'paredit-forward-barf-sexp)(define-key evil-normal-state-map ",~" 'paredit-convolute-sexp))(use-package erc:config(add-hook 'erc-insert-post-hook 'erc-truncate-buffer))(use-package ansi-term :no-require t:config(eval-after-load 'evil(evil-set-initial-state 'term-mode 'emacs)))(defun ansi-term-post (&rest r)(message "Loading ansi term...")(evil-set-initial-state 'term-mode 'emacs))(advice-add 'ansi-term :after 'ansi-term-post)(use-package org-brain :ensure t:init(setq org-brain-path "~/org-brain/"):config;; For Evil users(eval-after-load 'evil(evil-set-initial-state 'org-brain-visualize-mode 'emacs))(setq org-id-track-globally t)(setq org-id-locations-file "~/.emacs.d/.org-id-locations")(push '("b" "Brain" plain (function org-brain-goto-end)"* %i%?" :empty-lines 1)org-capture-templates)(setq org-brain-visualize-default-choices 'all)(setq org-brain-title-max-length 12)))
(deftheme el-zenburn"Created 2018-09-13.")(custom-theme-set-variables'el-zenburn'(ansi-color-faces-vector [default bold shadow italic underline bold bold-italic bold])'(ansi-color-names-vector ["#3F3F3F" "#CC9393" "#7F9F7F" "#F0DFAF" "#8CD0D3" "#DC8CC3" "#93E0E3" "#DCDCCC"])'(blink-matching-paren-distance 1024)'(hl-paren-background-colors nil)'(hl-paren-colors (quote ("yellow1" "gold1" "gold2" "gold3" "gold4")))'(initial-frame-alist nil)'(mac-command-modifier (quote super))'(mac-option-modifier (quote meta))'(nrepl-message-colors (quote ("#CC9393" "#DFAF8F" "#F0DFAF" "#7F9F7F" "#BFEBBF" "#93E0E3" "#94BFF3" "#DC8CC3"))))(custom-theme-set-faces'el-zenburn'(default ((t (:inherit nil :stipple nil :background "#3F3F3F" :foreground "#DCDCCC" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight ultra-light :height 131 :width normal :foundry "nil" :family "Source Code Pro"))))'(fringe ((t (:background "#3f3f3f" :foreground "#DCDCCC"))))'(header-line ((t (:background "#2B2B2B" :foreground "#F0DFAF" :box nil))))'(linum ((t (:foreground "gray45" :box nil :underline nil))))'(mode-line ((t (:background "dark slate gray" :foreground "#8FB28F" :box nil))))'(mode-line-highlight ((t nil)))'(mode-line-inactive ((t (:background "slate gray" :foreground "#5F7F5F" :box nil))))'(region ((t (:inverse-video t))))'(show-paren-mismatch ((t (:background "#6F6F6F" :foreground "red" :weight bold))))'(tool-bar ((t (:background "grey75" :foreground "black" :box nil))))'(variable-pitch ((t (:family "Lato"))))'(vertical-border ((t (:foreground "slate gray")))))(provide-theme 'el-zenburn)
(deftheme el-zenburn"Created 2018-09-13.")(custom-theme-set-variables'el-zenburn'(ansi-color-faces-vector [default bold shadow italic underline bold bold-italic bold])'(ansi-color-names-vector ["#3F3F3F" "#CC9393" "#7F9F7F" "#F0DFAF" "#8CD0D3" "#DC8CC3" "#93E0E3" "#DCDCCC"])'(blink-matching-paren-distance 1024)'(hl-paren-background-colors nil)'(hl-paren-colors (quote ("yellow1" "gold1" "gold2" "gold3" "gold4")))'(initial-frame-alist nil)'(mac-command-modifier (quote super))'(mac-option-modifier (quote meta))'(nrepl-message-colors (quote ("#CC9393" "#DFAF8F" "#F0DFAF" "#7F9F7F" "#BFEBBF" "#93E0E3" "#94BFF3" "#DC8CC3"))))(custom-theme-set-faces'el-zenburn'(default ((t (:inherit nil :stipple nil :background "#3F3F3F" :foreground "#DCDCCC" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight ultra-light :height 131 :width normal :foundry "nil" :family "Source Code Pro"))))'(fringe ((t (:background "#3f3f3f" :foreground "#DCDCCC"))))'(header-line ((t (:background "#2B2B2B" :foreground "#F0DFAF" :box nil))))'(linum ((t (:foreground "gray45" :box nil :underline nil))))'(mode-line ((t (:background "dark slate gray" :foreground "#8FB28F" :box nil))))'(mode-line-highlight ((t nil)))'(mode-line-inactive ((t (:background "slate gray" :foreground "#5F7F5F" :box nil))))'(region ((t (:inverse-video t))))'(show-paren-mismatch ((t (:background "#6F6F6F" :foreground "red" :weight bold))))'(tool-bar ((t (:background "grey75" :foreground "black" :box nil))))'(variable-pitch ((t (:family "Lato"))))'(vertical-border ((t (:foreground "slate gray")))))(provide-theme 'el-zenburn)