Break out #emacs config a little better
This commit is contained in:
@ -72,12 +72,6 @@
|
||||
(:prefix "o"
|
||||
:desc "Elfeed feed reader" "f" #'elfeed
|
||||
:desc "Lobste.rs" "l" #'ivy-lobsters)
|
||||
(:prefix "l"
|
||||
:desc "MPD Open playlist" "o" #'mpdel-playlist-open
|
||||
:desc "MPD Remove at point" "d" #'mpdel-playlist-delete
|
||||
:desc "MPD Start at point" "s" #'mpdel-playlist-play
|
||||
:desc "MPD Next track" "n" #'libmpdel-playback-next
|
||||
:desc "MPD Previous track" "p" #'libmpdel-playback-previous)
|
||||
(:prefix "b"
|
||||
:desc "Black format buffer" "f" #'blacken-buffer
|
||||
:desc "Links in buffer" "l" #'ace-link-org)
|
||||
@ -120,20 +114,6 @@
|
||||
(setq rmh-elfeed-org-files (list "~/org/elfeed.org")
|
||||
elfeed-search-filter "@1-week-ago +unread ")
|
||||
|
||||
;; emacs/eshell
|
||||
(after! eshell
|
||||
(set-eshell-alias!
|
||||
"f" "(other-window 1) && find-file $1"
|
||||
"l" "ls -lh"
|
||||
"d" "dired $1"
|
||||
"dc" "docker-compose $*"
|
||||
"fftest" "cd ~/src/ff/fifteen5 && docker-compose exec app django-admin test -k $*"
|
||||
"ffsh" "cd ~/src/ff/fifteen5/ && docker-compose exec app django-admin shell_plus"
|
||||
"ffdj" "cd ~/src/ff/fifteen5/ && docker-compose exec app django-admin $*"
|
||||
"gl" "(call-interactively 'magit-log-current)"
|
||||
"gs" "magit-status"
|
||||
"gc" "magit-commit"))
|
||||
|
||||
(add-hook 'prog-mode-hook #'goto-address-mode) ;; Linkify links!
|
||||
|
||||
;; tools/deft
|
||||
@ -144,14 +124,6 @@
|
||||
(setq magit-repository-directories '(("~/work" . 2))
|
||||
magit-save-repository-buffers nil)
|
||||
|
||||
;;; Setup sending email with msmtp
|
||||
(setq send-mail-function 'sendmail-send-it
|
||||
sendmail-program "/usr/local/bin/msmtp"
|
||||
mail-specify-envelope-from t
|
||||
message-sendmail-f-is-evil t
|
||||
message-sendmail-envelope-from 'header
|
||||
message-sendmail-extra-arguments '("--read-envelope-from")
|
||||
mail-envelope-from 'header)
|
||||
|
||||
;;; It is the opposite of fill-paragraph
|
||||
(defun unfill-paragraph ()
|
||||
@ -162,26 +134,21 @@
|
||||
;; Handy key definition
|
||||
(define-key global-map "\M-z" 'unfill-paragraph)
|
||||
|
||||
(achievements-mode)
|
||||
; add a v
|
||||
(nyan-mode)
|
||||
|
||||
(add-to-list 'auto-mode-alist '("\\.plantuml\\'" . planetuml-mode))
|
||||
|
||||
(load! "+ui.el")
|
||||
(load! "+org") ;; Org mode stuff like todos and rebindings
|
||||
(load! "+org-cal")
|
||||
(load! "+nov") ;; nov.el epub mode settings
|
||||
;(load! "+elfeed")
|
||||
(load! "+mail") ;; Mail stuff
|
||||
(load! "+eshell")
|
||||
(load! "+mpd")
|
||||
(load! "+ranger")
|
||||
(load! "+mastodon")
|
||||
(load! "+wttrin") ;; Weather config
|
||||
|
||||
(defun mpdel-playlist-play ()
|
||||
"Start playing the song at point."
|
||||
(interactive)
|
||||
(if (derived-mode-p 'mpdel-playlist-current-playlist-mode)
|
||||
(libmpdel-play-song (navigel-entity-at-point))
|
||||
(mpdel-core-insert-current-playlist)))
|
||||
;(load! "+elfeed") ;; This runs a background web process ...
|
||||
|
||||
;; findout timezone location strings at http://worldtime.io
|
||||
(setq display-time-world-list '(("America/Los_Angeles" "San Francisco")
|
||||
@ -190,3 +157,4 @@
|
||||
("Europe/London" "London")
|
||||
("Europe/Warsaw" "Warsaw")
|
||||
("Europe/Kiev" "Lviv")))
|
||||
|
||||
|
||||
Reference in New Issue
Block a user