(Emacs/config)~minor adjustments

This commit is contained in:
2024-09-08 03:02:38 +01:00
parent a8fe7c09c4
commit 219a5741e6

View File

@@ -281,7 +281,7 @@ eyes too much.
(defun +oreo/sync-theme () (defun +oreo/sync-theme ()
(let ((hour (read (format-time-string "%H")))) (let ((hour (read (format-time-string "%H"))))
(setq +oreo/theme (setq +oreo/theme
(if (or (< hour 8) (> hour 18)) (if (or (< hour 8) (>= hour 18))
1 1
0)) 0))
(+oreo/load-theme))) (+oreo/load-theme)))
@@ -297,7 +297,7 @@ Adjust font sizes for my devices.
(set-face-attribute 'default nil :height (set-face-attribute 'default nil :height
(pcase (system-name) (pcase (system-name)
("newboy" 145) ("newboy" 145)
("ravenmaiden" 145) ("ravenmaiden" 135)
(_ 130)))) (_ 130))))
#+end_src #+end_src
** Startup screen ** Startup screen
@@ -645,7 +645,8 @@ Setup the evil package, with some opinionated keybindings:
(leader (leader
"w" '(evil-window-map :which-key "Window") "w" '(evil-window-map :which-key "Window")
"wT" #'window-swap-states "wT" #'window-swap-states
"wd" #'evil-window-delete) "wd" #'evil-window-delete
"w;" #'make-frame)
(nmmap (nmmap
"K" #'man "K" #'man
@@ -1770,7 +1771,6 @@ easier than even using the mark based system.
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package wdired (use-package wdired
:straight t
:after dired :after dired
:general :general
(nmmap (nmmap
@@ -2140,7 +2140,6 @@ Of course Emacs has a cool screensaver software.
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package zone-matrix (use-package zone-matrix
:straight t
:defer t :defer t
:commands (zone) :commands (zone)
:general :general
@@ -2236,7 +2235,6 @@ flyspell-mode should be hooked to text-mode.
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package flyspell (use-package flyspell
:straight t
:defer t :defer t
:hook (text-mode-hook . flyspell-mode) :hook (text-mode-hook . flyspell-mode)
:general :general
@@ -2344,6 +2342,7 @@ context and easier to use.
Modern package for thesaurus in Emacs with a transient + hydra. Modern package for thesaurus in Emacs with a transient + hydra.
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package powerthesaurus (use-package powerthesaurus
:defer t
:straight t :straight t
:general :general
(search-leader (search-leader
@@ -2714,13 +2713,12 @@ I'm not very bothered.
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package org (use-package org
:straight t
:defer t :defer t
:init :init
(setq org-directory "~/Text/" (setq org-directory "~/Text/"
org-adapt-indentation nil org-adapt-indentation nil
org-indent-mode nil org-indent-mode nil
org-startup-indented t org-startup-indented nil
org-startup-folded 'content org-startup-folded 'content
org-startup-with-latex-preview nil org-startup-with-latex-preview nil
org-imenu-depth 10 org-imenu-depth 10
@@ -3621,6 +3619,8 @@ Setup for python shell, including a toggle option
:general :general
(shell-leader (shell-leader
"p" #'run-python) "p" #'run-python)
:hook
(inferior-python-mode-hook . company-mode)
:display :display
("\\*Python\\*" ("\\*Python\\*"
(display-buffer-at-bottom) (display-buffer-at-bottom)
@@ -3710,10 +3710,7 @@ eglot.
:init :init
(setq js-indent-level 2)) (setq js-indent-level 2))
#+end_src #+end_src
*** WAIT Typescript *** Typescript
:PROPERTIES:
:header-args:emacs-lisp: :tangle no
:END:
A language that adds a build step to JavaScript projects for "static" A language that adds a build step to JavaScript projects for "static"
typing. It's nice because it adds nice auto completion. typing. It's nice because it adds nice auto completion.