Cleaned Emacs.org, Removed Unused Packages

This commit is contained in:
ry
2021-12-11 23:27:50 -08:00
parent ef2bb71849
commit 19a7a61ab0
3 changed files with 109 additions and 93 deletions

View File

@@ -1,15 +1,22 @@
(add-to-list 'load-path "~/bin/emacs-ob-racket")
(add-to-list 'load-path "~/.guix-profile/bin/guile")
;; Match Emacs program path to be the same as user shell
(defun set-exec-path-from-shell-PATH ()
"Set up Emacs' `exec-path' and PATH environment variable to match
that used by the user's shell.
(interactive)
(let ((path-from-shell (replace-regexp-in-string
"[ \t\n]*$" "" (shell-command-to-string
"$SHELL --login -c 'echo $PATH'"))))
(setenv "PATH" path-from-shell)
(setq exec-path (split-string path-from-shell path-separator))))
(set-exec-path-from-shell-PATH)
;; Setting general info
(setq user-full-name "Ry"
user-mail-address "ry@opal.sh")
;; load theme
(setq doom-theme 'modus-operandi)
;; Set org agenda dir
(setq org-directory "~/org/")
;; Set line number
(setq display-line-numbers-type t)
@@ -18,11 +25,6 @@
;; Add this hook to ERC if I run into trouble with truncated lines in other modes.
;; (add-hook 'erc-mode-hook (lambda () (setq-default truncate-lines nil)))
;; Set visible bell
(setq visible-bell t)
;; Enable clipboard
(setq x-select-enable-clipboard t)
;; Only enable line numbers for certain modes
(dolist (mode '(org-mode-hook
@@ -31,6 +33,12 @@
eshell-mode-hook))
(add-hook mode (lambda () (display-line-numbers-mode 0))))
;; Enable clipboard
(setq x-select-enable-clipboard t)
;; load theme
(setq doom-theme 'modus-operandi)
;; Configure Modus theme
(use-package modus-themes
:init
@@ -83,7 +91,9 @@
(set-face-attribute 'line-number nil :inherit 'fixed-pitch)
(set-face-attribute 'line-number-current-line nil :inherit 'fixed-pitch))
;; General setttings
;; Set org agenda dir
(setq org-directory "~/org/")
(defun rymacs/org-mode-setup ()
(org-indent-mode)
(variable-pitch-mode 1)
@@ -95,7 +105,6 @@
:hook (org-mode . rymacs/org-mode-setup)
:config
(setq org-ellipsis " ")
(setq org-agenda-start-with-log-mode t)
(setq org-log-done 'time)
(setq org-log-into-drawer t)
@@ -291,8 +300,8 @@
;; Refresh mail using isync every 5 minutes
(setq mu4e-update-interval (* 5 60))
(setq mu4e-get-mail-command "mbsync -a -c ~/dotfiles/.config/mbsync/mbsyncrc")
(setq mu4e-maildir "~/mail")
(setq mu4e-get-mail-command "mbsync -a -c ~/Dotfiles/.config/mbsync/mbsyncrc")
(setq mu4e-maildir "~/Mail")
(setq mu4e-contexts
(list
@@ -322,22 +331,10 @@
erc-track-shorten-start 8
erc-kill-buffer-on-part t
erc-auto-query 'bury
erc-fill-column 120
erc-fill-column 90
erc-fill-function 'erc-fill-static
erc-fill-static-center 20
erc-track-visibility nil
erc-interpret-mirc-color t
erc-rename-buffers t
erc-track-exclude-server-buffer t)
(global-set-key (kbd "C-x w") 'elfeed) ; set elfeed keybind
(setq elfeed-feeds
'(; websites
"https://landchad.net/rss.xml"
"http://stallman.org/rss/rss.xml"
"https://guix.gnu.org/feeds/blog.atom"
; twitter/nitter
"https://nitter.net/fsf/rss"
; tube
"https://odysee.com/$/rss/@AlphaNerd:8"))

View File

@@ -84,7 +84,7 @@
grammar ; tasing grammar mistake every you make
:tools
ansible
;;ansible
;;debugger ; FIXME stepping through code, to help you add bugs
;;direnv
docker
@@ -131,13 +131,13 @@
;;fsharp ; ML stands for Microsoft's Language
;;fstar ; (dependent) types and (monadic) effects and Z3
;;gdscript ; the language you waited for
(go +lsp) ; the hipster dialect
;;(go +lsp) ; the hipster dialect
;;(haskell +lsp) ; a language that's lazier than I am
;;hy ; readability of scheme w/ speed of python
;;idris ; a language you can depend on
json ; At least it ain't XML
;;json ; At least it ain't XML
;;(java +meghanada) ; the poster child for carpal tunnel syndrome
javascript ; all(hope(abandon(ye(who(enter(here))))))
;;javascript ; all(hope(abandon(ye(who(enter(here))))))
;;julia ; a better, faster MATLAB
;;kotlin ; a better, slicker Java(Script)
;;latex ; writing papers in Emacs has never been so fun
@@ -158,7 +158,7 @@
;;raku ; the artist formerly known as perl6
;;rest ; Emacs as a REST client
;;rst ; ReST in peace
(ruby +rails) ; 1.step {|i| p "Ruby is #{i.even? ? 'love' : 'life'}"}
;;(ruby +rails) ; 1.step {|i| p "Ruby is #{i.even? ? 'love' : 'life'}"}
;;rust ; Fe2O3.unwrap().unwrap().unwrap().unwrap()
;;scala ; java, but good
(scheme +guile) ; a fully conniving family of lisps