Update emacs.org

This commit is contained in:
Sakooooo 2023-12-17 13:36:18 +04:00 committed by GitHub
parent 39e3a146ab
commit 12ab87fbf7
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

View file

@ -202,8 +202,6 @@ Should make startup faster, taken from doom-emacs
)) ))
(defvar-local sakoline-buffer-name (defvar-local sakoline-buffer-name
'(:eval '(:eval
(propertize (buffer-name) 'face '(:foreground "#669999"))) (propertize (buffer-name) 'face '(:foreground "#669999")))
@ -273,6 +271,14 @@ Should make startup faster, taken from doom-emacs
((buffer-modified-p) ((buffer-modified-p)
(propertize "!!!" (propertize "!!!"
'face 'sakoline-buffer-state-modified))))) 'face 'sakoline-buffer-state-modified)))))
;; some weird spacing bullshit
;; weird how its not built in
(defun sakoline-line-render (left right)
"Return a string of `window-width' length containing LEFT, and RIGHT
aligned respectively."
(let* ((available-width (- (window-width) (length left) 2)))
(format (format " %%s %%%ds " available-width) left right)))
#+end_src #+end_src
* Packages * Packages
** Log state ** Log state
@ -604,7 +610,7 @@ Should make startup faster, taken from doom-emacs
:straight t :straight t
:hook (org-mode . org-indent-mode) :hook (org-mode . org-indent-mode)
:config :config
(setq org-ellipsis "") (setq org-ellipsis "")
(setq org-agenda-start-with-log-mode t) (setq org-agenda-start-with-log-mode t)
(setq org-log-done 'time) (setq org-log-done 'time)
(setq org-log-into-drawer t) (setq org-log-into-drawer t)
@ -734,6 +740,7 @@ We have to compete with notion somehow right?
*** Olivetti *** Olivetti
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package olivetti (use-package olivetti
:straight t
:hook (org-mode . (lambda () (interactive) (olivetti-mode) (olivetti-set-width 100)))) :hook (org-mode . (lambda () (interactive) (olivetti-mode) (olivetti-set-width 100))))
#+end_src #+end_src
** Org-Roam ** Org-Roam
@ -1053,6 +1060,9 @@ make sure to setup authinfo
(use-package markdown-mode (use-package markdown-mode
:straight t :straight t
:hook (markdown-mode . visual-line-mode)) :hook (markdown-mode . visual-line-mode))
(use-package markdown-preview-mode
:straight t)
#+end_src #+end_src
*** Commenter *** Commenter
#+begin_src emacs-lisp #+begin_src emacs-lisp