[emacs] Cleaning up so I get my tools back

This commit is contained in:
2020-06-04 14:32:40 -04:00
parent 28e7e41996
commit 1b7dacecd3
3 changed files with 89 additions and 219 deletions

View File

@ -34,7 +34,6 @@ border.
** Fringe
#+BEGIN_SRC emacs-lisp
(nyan-mode) ;; progress in the form of a rainbow cat.
(beacon-mode) ;; show me the cursor!
(add-hook 'after-init-hook #'global-emojify-mode) ;; emojis?!
(add-hook 'prog-mode-hook #'goto-address-mode) ;; linify links!
#+END_SRC
@ -104,9 +103,8 @@ Right now, just make sure I can connect to my local Mopidy server via MPDel.
:desc "MPD Next track" "n" #'libmpdel-playback-next
:desc "MPD Previous track" "p" #'libmpdel-playback-previous))
#+END_SRC
* RSS (elfeed)
** Setup feeds
Here were going to use Tiny Tiny RSS as a backend store for our RSS feeds.
* RSS
Here were going to use TinyTinyRSS as a backend store for our RSS feeds.
#+BEGIN_SRC emacs-lisp
(setq elfeed-protocol-ttrss-maxsize 200) ;; bigger than 200 is invalid
(setq elfeed-feeds '("ttrss+https://powellc:hT7nPKAHa^fYwXZ*@reader.unbl.ink"))
@ -115,7 +113,7 @@ Here were going to use Tiny Tiny RSS as a backend store for our RSS feeds.
(elfeed-protocol-enable)
;; Schedule feed update for every day at 3PM
(run-at-time "15:00" nil 'elfeed-update)
(run-at-time "15 min" nil 'elfeed-update)
#+END_SRC
Then welll setup some nice defaults and font settings for viewing feeds in Elfeed.
@ -128,27 +126,19 @@ Then welll setup some nice defaults and font settings for viewing feeds in El
(add-hook! 'elfeed-mode-hook 'variable-pitch-mode)
(add-hook! 'elfeed-show-mode-hook (text-scale-set 1.2))
#+END_SRC
** Key bindings
#+BEGIN_SRC emacs-lisp
(map! :leader
(:prefix "r"
:desc "Update Elfeed" "u" #'elfeed-update))
#+END_SRC
* Formatting
Here we define the opposite function to fill-paragraph and then map it to Meta-z, which helps when undoing fill paragraph moves.
#+BEGIN_SRC emacs-lisp
;;; It is the opposite of fill-paragraph
(defun unfill-paragraph ()
"Takes a multi-line paragraph and makes it into a single line of text."
(interactive)
(let ((fill-column (point-max)))
(fill-paragraph nil)))
;; Handy key definition
(define-key global-map "\M-z" 'unfill-paragraph)
#+END_SRC
PlantUML is pretty fantastic. This enables a mode for editing plantUML files in
Emacs.
PlantUML is pretty fantastic. This enables a mode for editing plantuml files in Emacs.
#+BEGIN_SRC emacs-lisp
;; PlantUML is awesome for quick diagrams
(add-to-list 'auto-mode-alist '("\\.plantuml\\'" . plantuml-mode))
@ -166,39 +156,10 @@ Handy clock to look up what timezone my co-workers are in!
#+END_SRC
* Org-mode
** Basic configuration
Do I use deft? Not really. Every once in a while I think I will. This makes sure
it works when I get an impulse.
#+BEGIN_SRC emacs-lisp
(setq deft-extensions '("org"))
(setq deft-directory "~/org")
#+END_SRC
A handful of mods here clean up org mode. Line numbers dont mean much when
youre folding and unfolding all the time. I also really enjoy the typography of
a serif font when Im writing a lot of words.
A handful of mods here clean up org mode. Line numbers dont mean much when youre folding and unfolding all the time. I also really enjoy the typography of a serif font when Im writing a lot of words.
#+BEGIN_SRC emacs-lisp
(add-hook 'org-mode-hook #'doom-disable-line-numbers-h)
;;(add-hook 'org-mode-hook 'typo-mode)
; For org mode serif
;(add-hook 'org-mode-hook 'variable-pitch-mode)
;(add-hook 'org-mode-hook
; '(lambda ()
; (mapc
; (lambda (face) ;; Other fonts with fixed-pitch.
; (set-face-attribute face nil :inherit 'fixed-pitch))
; (list 'org-link
; 'org-block
; 'org-table
; 'org-block-begin-line
; 'org-block-end-line))))
(add-hook 'org-mode-hook #'auto-fill-mode)
(remove-hook 'org-mode-hook #'word-wrap-mode)
#+END_SRC
#+BEGIN_SRC emacs-lisp
(after! org
(setq org-directory (expand-file-name "~/org/")
org-agenda-files (list org-directory)
@ -235,8 +196,8 @@ a serif font when Im writing a lot of words.
#+END_SRC
** Key bindings
I add only two custom mappings to the default org mode maps, a shortcut to my Inbox file and a quick way to save all open org mode files.
#+BEGIN_SRC emacs-lisp
;; org-set-tags-command
(setq +inbox-file "~/org/inbox.org")
(defun +open-inbox-file ()
(interactive)
@ -246,15 +207,11 @@ a serif font when Im writing a lot of words.
(map!
:leader
:desc "Open inbox" "I" #'+open-inbox-file
:desc "Open today" "T" #'org-roam-today
:desc "Open today" "Y" #'org-roam-yesterday
:desc "Open tomorrow" "N" #'org-roam-tomorrow)
(map! :leader
(:prefix "f" :desc "Save all org buffers" "a" #'org-save-all-org-buffers))
:desc "Save all org buffers" "A" #'org-save-all-org-buffers)
#+END_SRC
** Agenda configuration
#+BEGIN_SRC emacs-lisp
(setq org-agenda-span 5
(setq org-agenda-span 3
org-agenda-start-day "1d")
(defun +show-agenda ()
(interactive)
@ -268,27 +225,9 @@ a serif font when Im writing a lot of words.
(find-file +todo-file))
#+END_SRC
** Org-roam
I am absolutely in love with [[https://org-roam.readthedocs.io/en/develop/][Org-roam]]. Everything about it makes taking notes
easier. I just need to level up with Zettels and web publishing of my notes.
I am absolutely in love with [[https://org-roam.readthedocs.io/en/develop/][Org-roam]]. Everything about it makes taking notes easier. I just need to level up with Zettels and web publishing of my notes.
#+BEGIN_SRC emacs-lisp
(use-package! org-roam
:commands (org-roam-insert org-roam-find-file org-roam)
:init
(setq org-roam-directory "~/org/")
(map! :leader
:prefix "n"
:desc "Org-Roam-Insert" "i" #'org-roam-insert
:desc "Org-Roam-Find" "/" #'org-roam-find-file
:desc "Org-Roam-Buffer" "r" #'org-roam)
:config
(org-roam-mode +1))
(with-eval-after-load 'org-roam
(with-eval-after-load 'company
(with-eval-after-load 'org
(require 'company-org-roam)
(company-org-roam-init))))
(setq org-roam-directory "~/org/")
#+END_SRC
* Novel
@ -377,32 +316,10 @@ Handful of fun aliases to make working in Eshell almost like a /real/ shell :smi
"f" "(other-window 1) && find-file $1"
"l" "ls -lh"
"d" "dired $1"
"ff" "cd ~/src/ff/fifteen5"
"djtest" "cd ~/src/ff/fifteen5 & django-admin test -k $*"
"djsh" "cd ~/src/ff/fifteen5/ & django-admin shell_plus"
"djrun" "cd ~/src/ff/fifteen5/ & django-admin runserver_plus"
"dj" "cd ~/src/ff/fifteen5/ & django-admin $*"
"gl" "(call-interactively 'magit-log-current)"
"gs" "magit-status"
"gc" "magit-commit"))
#+END_SRC
* Ranger
Trick out ranger a bit.
#+BEGIN_SRC emacs-lisp
(use-package! ranger
:commands (ranger deer ranger-override-dired-fn)
:config
(set-popup-rule! "^\\*ranger" :ignore t))
(map!
(:leader
(:prefix "a"
:desc "Ranger" "r" #'ranger
:desc "Deer" "d" #'deer)))
(add-hook! dired-mode #'ranger-override-dired-fn) ;; Override dired-mode so it uses deer
#+END_SRC
* Mastodon
There's gotta be a way to get the token out of password-store for this.