diff --git a/README.org b/README.org index 1ca5399d..e9ece5fd 100644 --- a/README.org +++ b/README.org @@ -63,10 +63,17 @@ Let's create a message that will tell us how long it takes emacs to load in orde (add-hook 'emacs-startup-hook #'chris/display-startup-time) #+end_src +#+RESULTS: +| chris/display-startup-time | + Let's also set the =gc-cons-threshold= variable to a high setting for the remainder of our setup process to speed things up. This is no long done here but instead is done in the =early-init.el= file. #+begin_src emacs-lisp :tangle no (setq gc-cons-threshold 50000000) #+end_src + +#+RESULTS: +: 50000000 + ** Set basic UI config Let's start by making some basic ui changes like turning off the scrollbar, toolbar, menu, tooltips, and setting our font and some things. #+begin_src emacs-lisp @@ -85,6 +92,8 @@ Let's start by making some basic ui changes like turning off the scrollbar, tool (setq comp-deferred-compilation-deny-list nil) #+end_src +#+RESULTS: + In order to have this config work on both my desktop with regular joe-schmoe monitors and my laptop with new-hotness HiDPI monitor, I will set the font size if my system is the laptop to much higher. #+begin_src emacs-lisp (if (string-equal (system-name) "syl") @@ -118,6 +127,9 @@ In order to have this config work on both my desktop with regular joe-schmoe mon #+end_src +#+RESULTS: +| (lambda (frame) (with-selected-frame frame (chris/set-font-faces))) | evil-init-esc | (closure (bootstrap-version t) (frame) (let ((old-frame (selected-frame)) (old-buffer (current-buffer))) (unwind-protect (progn (select-frame frame 'norecord) (setq doom-modeline-icon t)) (if (frame-live-p old-frame) (progn (select-frame old-frame 'norecord))) (if (buffer-live-p old-buffer) (progn (set-buffer old-buffer)))))) | doom-modeline-refresh-font-width-cache | doom-modeline-set-selected-window | doom-modeline-set-char-widths | (closure (t) (frame) (let ((old-frame (selected-frame)) (old-buffer (current-buffer))) (unwind-protect (progn (select-frame frame 'norecord) (chris/set-font-faces)) (if (frame-live-p old-frame) (progn (select-frame old-frame 'norecord))) (if (buffer-live-p old-buffer) (progn (set-buffer old-buffer)))))) | select-frame | aw--after-make-frame | + Then let's make sure line-numbers are relative and on. And let's turn on visual-line-mode globally. #+begin_src emacs-lisp (setq display-line-numbers-type 'relative) @@ -126,6 +138,9 @@ Then let's make sure line-numbers are relative and on. And let's turn on visual- (global-visual-line-mode +1) #+end_src +#+RESULTS: +: t + Here are some ui changes I pulled from Doom Emacs #+begin_src emacs-lisp @@ -143,21 +158,32 @@ Here are some ui changes I pulled from Doom Emacs split-height-threshold nil) #+end_src +#+RESULTS: + Let's make doc-view better #+begin_src emacs-lisp (setq doc-view-resolution 192) #+end_src +#+RESULTS: +: 192 + Also, real quick let's make sure that ~~ works as the same as ~~ #+begin_src emacs-lisp (global-set-key (kbd "") 'keyboard-escape-quit) #+end_src +#+RESULTS: +: keyboard-escape-quit + Let's also turn on =recentf-mode=. #+begin_src emacs-lisp (recentf-mode +1) #+end_src +#+RESULTS: +: t + Finally this is not part of the UI but let's do this early and start the server so I can use emacsclient from my WM. #+begin_src emacs-lisp (server-start) @@ -1184,6 +1210,7 @@ Part of this config includes some special capture templates for my work as a you (width . 100))) (org-agenda-list))) + (setq org-latex-packages-alist '(("margin=2cm" "geometry" nil))) :general (chris/leader-keys @@ -2061,11 +2088,15 @@ interfere with the default `bongo-playlist-buffer'." (interactive) (bongo--run-mpv-command bongo-player "speed" "set" "speed" "1.95")) + (defun chris/bongo-open-elfeed-queue-buffer () + (interactive) + (display-buffer "*Bongo-Elfeed Queue*")) + :general (chris/leader-keys :states 'normal - :keymaps 'override - "ob" 'bongo) + "ob" 'bongo + "oB" 'chris/bongo-open-elfeed-queue-buffer) (general-def 'normal bongo-playlist-mode-map "RET" 'bongo-dwim "d" 'bongo-kill-line diff --git a/init.el b/init.el index 8153d124..0d9c02e3 100644 --- a/init.el +++ b/init.el @@ -784,6 +784,7 @@ vertically." (width . 100))) (org-agenda-list))) + (setq org-latex-packages-alist '(("margin=2cm" "geometry" nil))) :general (chris/leader-keys @@ -1569,11 +1570,15 @@ interfere with the default `bongo-playlist-buffer'." (interactive) (bongo--run-mpv-command bongo-player "speed" "set" "speed" "1.95")) + (defun chris/bongo-open-elfeed-queue-buffer () + (interactive) + (display-buffer "*Bongo-Elfeed Queue*")) + :general (chris/leader-keys :states 'normal - :keymaps 'override - "ob" 'bongo) + "ob" 'bongo + "oB" 'chris/bongo-open-elfeed-queue-buffer) (general-def 'normal bongo-playlist-mode-map "RET" 'bongo-dwim "d" 'bongo-kill-line