flinner
/
dots
mirror of https://github.com/Flinner/dots.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

refactor: add indentation/spacing to emacs org config

This commit is contained in:
Flinner Yuu 2025-05-22 15:37:31 +03:00
parent cf688ba700
commit 00dd3bdf71
Signed by: flinner
GPG Key ID: 95CE0DA7F0E58CA6
1 changed files with 1384 additions and 1381 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

83
emacs.mine/.config/emacs.mine/emacs.org
View File

@ -63,7 +63,7 @@ straight
remove warning by use-package
#+begin_src emacs-lisp
(custom-set-variables '(warning-suppress-types '((use-package))))
(custom-set-variables '(warning-suppress-types '((use-package))))
#+end_src
* Basic Configuration
@ -158,7 +158,7 @@ run this hook:
Arabic fonts :)
#+begin_src emacs-lisp
(when window-system (set-fontset-font "fontset-default" '(#x600 . #x6ff) my/ui/arabicfont))
(when window-system (set-fontset-font "fontset-default" '(#x600 . #x6ff) my/ui/arabicfont))
#+end_src
** Theme
@ -174,6 +174,7 @@ The status line
:init (doom-modeline-mode 1)
:config
(display-battery-mode 1)
(setq doom-modeline-irc-stylize #'ignore); Fix sever lag https://github.com/seagle0128/doom-modeline/issues/297
:custom
((doom-modeline-height 15) (doom-modeline-icon t)))
#+end_src
@ -269,7 +270,7 @@ Self explanatory
** Org roam warning
#+begin_src emacs-lisp
(setq org-roam-v2-ack t) ; anonying startup message
(setq org-roam-v2-ack t) ; anonying startup message
#+end_src
** Tab Width
@ -292,8 +293,8 @@ should i really be commiting this? :>
"secrets:local"; keepassxc db
"~/.authinfo"
"~/.netrc"))
(require 'epa-file)
(epa-file-enable)
(require 'epa-file)
(epa-file-enable)
#+end_src
* Help
@ -571,7 +572,7 @@ Capture
*** Closing Brackets
#+begin_src emacs-lisp
))
))
#+end_src
** Evil
@ -821,7 +822,7 @@ Ivy floating
** Which Key (Shows Next keys)
slow loading! defer it
#+begin_src emacs-lisp
(use-package which-key
(use-package which-key
:defer 10
:diminish which-key-mode
:config
@ -860,7 +861,7 @@ slow loading! defer it
*** lsp + yasnippet
#+begin_src emacs-lisp
(defun my-backends ()
(defun my-backends ()
(set (make-local-variable 'company-backends)
'((company-capf ;; I think this must come first?
:with
@ -984,7 +985,7 @@ use-package
Capture Templates
#+begin_src emacs-lisp
(use-package doct
(use-package doct
:ensure t
;;recommended: defer until calling doct
:commands (doct))
@ -1035,7 +1036,7 @@ I now use olivetti mode, this code block is ignored!
*** org-bullets
#+begin_src emacs-lisp
(use-package org-bullets
(use-package org-bullets
:after org
:hook (org-mode . org-bullets-mode)
:custom
@ -1045,8 +1046,8 @@ I now use olivetti mode, this code block is ignored!
*** Latex
scale inline
#+begin_src emacs-lisp
; moved to use -package
; (setq org-format-latex-options (plist-put org-format-latex-options :scale 1.5))
; moved to use -package
; (setq org-format-latex-options (plist-put org-format-latex-options :scale 1.5))
#+end_src
** Babel
@ -1354,7 +1355,7 @@ From: https://yiufung.net/post/anki-org/
*** COMMENT org-ql
#+begin_src emacs-lisp
(use-package helm-org-ql :after org-ql)
(use-package helm-org-ql :after org-ql)
#+end_src
#+begin_src emacs-lisp
@ -1716,8 +1717,8 @@ Lsp UI
*** Flycheck
#+begin_src emacs-lisp
(use-package flycheck
:custom-face (flycheck-warning ((t (:underline (:color "#fabd2f" :style line :position line)))))
(use-package flycheck
:custom-face (flycheck-warning ((t (:underline (:color "#fabd2f" :style line :position line)))))
(flycheck-error ((t (:underline (:color "#fb4934" :style line :position line)))))
(flycheck-info ((t (:underline (:color "#83a598" :style line :position line))))))
#+end_src
@ -1742,7 +1743,7 @@ Lsp UI
*** Debug
Use the Debug Adapter Protocol for running tests and debugging
#+begin_src emacs-lisp
(use-package dap-mode
(use-package dap-mode
:hook
(lsp-mode . dap-mode)
(lsp-mode . dap-ui-mode))
@ -1786,7 +1787,7 @@ Magit TODOs!
(use-package git-gutter
:hook (prog-mode . git-gutter-mode)
:config
(setq git-gutter:update-interval 0.02))
(setq git-gutter:update-interval 2))
(use-package git-gutter-fringe
:config
@ -2064,7 +2065,7 @@ Better Diff in header sizes
*** COMMENT Vue
#+begin_src emacs-lisp
(use-package vue-mode
(use-package vue-mode
:hook (vue-mode . lsp)
:hook (vue-mode . prettier-js-mode))
#+end_src
@ -2082,7 +2083,7 @@ Better Diff in header sizes
*** Scala
Scala mode for highlighting, indents and motion commands
#+begin_src emacs-lisp
(use-package scala-mode
(use-package scala-mode
:hook
(scala-mode . flycheck-mode)
(scala-mode . lsp)
@ -2095,7 +2096,7 @@ Scala mode for highlighting, indents and motion commands
Sbt for sbt commands...
#+begin_src emacs-lisp
(use-package sbt-mode
(use-package sbt-mode
:commands sbt-start sbt-command
:config
;; WORKAROUND: https://github.com/ensime/emacs-sbt-mode/issues/31
@ -2253,13 +2254,13 @@ AucTex (Archived, =:tangle= set to =no=)
(add-to-list 'LaTeX-clean-intermediate-suffixes '"-figure[0-9]*\\.\\(pdf\\|md5\\|log\\|dpth\\|dep\\|run\\.xml\\)")
(add-to-list 'LaTeX-clean-intermediate-suffixes '".auxlock")
; (eval-after-load 'latex
; `(dolist (face '((font-latex-sectioning-0-face . 3.0) ; \part
; (font-latex-sectioning-1-face . 2.5) ; \chapter
; (font-latex-sectioning-2-face . 2.0) ; \section
; (font-latex-sectioning-3-face . 1.5) ; \subsection
; (font-latex-sectioning-4-face . 1.5))) ; \subsubsection
; (set-face-attribute (car face) nil :font my/ui/varfont :weight 'bold :height (cdr face))))
; (eval-after-load 'latex
; `(dolist (face '((font-latex-sectioning-0-face . 3.0) ; \part
; (font-latex-sectioning-1-face . 2.5) ; \chapter
; (font-latex-sectioning-2-face . 2.0) ; \section
; (font-latex-sectioning-3-face . 1.5) ; \subsection
; (font-latex-sectioning-4-face . 1.5))) ; \subsubsection
; (set-face-attribute (car face) nil :font my/ui/varfont :weight 'bold :height (cdr face))))
;; to have the buffer refresh after compilation,
;; very important so that PDFView refesh itself after comilation
@ -2277,12 +2278,12 @@ AucTex (Archived, =:tangle= set to =no=)
Custom functions (Archived, =:tangle= set to =no=)
#+begin_src emacs-lisp :tangle no
(defun try/latex-mode-setup ()
(defun try/latex-mode-setup ()
(require 'company-reftex)
(turn-on-reftex)
(require 'company-auctex)
(require 'company-math)
(setq-local company-backends
(setq-local company-backends
(append '((company-reftex-labels company-reftex-citations)
(company-math-symbols-unicode company-math-symbols-latex company-latex-commands)
@ -2536,7 +2537,7 @@ Unused, switched to =hledger=
#+end_src
#+begin_src emacs-lisp
(use-package flycheck-hledger
(use-package flycheck-hledger
:after (flycheck hledger-mode)
:demand t)
@ -2644,7 +2645,7 @@ Unused, switched to =hledger=
tramp-file-name-regexp))
(setq vc-handled-backends '(Git))
;https://libredd.it/r/emacs/comments/320cvb/projectile_slows_tramp_mode_to_a_crawl_is_there_a/
(add-hook 'find-file-hook
(add-hook 'find-file-hook
(lambda ()
(when (file-remote-p default-directory)
(setq-local projectile-mode-line "Projectile"
@ -2676,7 +2677,7 @@ Unused, switched to =hledger=
#+end_src
#+begin_src emacs-lisp
(use-package vterm-toggle)
(use-package vterm-toggle)
#+end_src
** Server
@ -2777,7 +2778,7 @@ Unused, switched to =hledger=
#+end_src
* Elfeed org
=;; (setq rmh-elfeed-org-files (list "~/Documents/private.el/elfeed.org"))=
=;; (setq rmh-elfeed-org-files (list "~/Documents/private.el/elfeed.org"))=
** Elfeed-org
#+begin_src emacs-lisp
(use-package elfeed-org
@ -2977,6 +2978,8 @@ I wrote that, neat isn't it? :P
:bind (:map circe-mode-map
([remap counsel-projectile-find-file] . my/circe/helm-buffers))
)
(use-package circe-notifications)
#+end_src
#+begin_src emacs-lisp
@ -3001,7 +3004,7 @@ I wrote that, neat isn't it? :P
*** znc stuff
#+begin_src emacs-lisp
(defun circe-command-ZNC (what)
(defun circe-command-ZNC (what)
"Send a message to ZNC incorporated by user '*status'."
(circe-command-MSG "*status" what))
@ -3048,7 +3051,7 @@ I wrote that, neat isn't it? :P
;; ~/Maildir/Account0/{Inbox,Sent,Trash}
;; ~/Maildir/Account1/{Inbox,Sent,Trash}
;; where Account0 is context name
(with-eval-after-load 'mu4e
(with-eval-after-load 'mu4e
(defun my-make-mu4e-context (context-name full-name mail-address signature)
"Return a mu4e context named CONTEXT-NAME with :match-func matching
folder name CONTEXT-NAME in Maildir. The context's `user-mail-address',
@ -3108,7 +3111,7 @@ I wrote that, neat isn't it? :P
;; This is a sample, it doesn't get included in init.el
;; I put mine at location specified in the next code block
;; any number of email can be used ofc
(with-eval-after-load 'mu4e
(with-eval-after-load 'mu4e
(setq mu4e-contexts `(
,(my-make-mu4e-context
"maildir-context" "Full Name"
@ -3121,7 +3124,7 @@ I wrote that, neat isn't it? :P
or don't include in git source :)
#+begin_src emacs-lisp
(with-eval-after-load 'mu4e
(with-eval-after-load 'mu4e
(load "~/Documents/Passwords/mu4e-context.el"))
#+end_src
@ -3132,7 +3135,7 @@ should only move to trash, not delete entirely from the server
#+begin_src emacs-lisp
(with-eval-after-load 'mu4e
(with-eval-after-load 'mu4e
(setf (alist-get 'trash mu4e-marks)
(list :char '("d" . "▼")
:prompt "dtrash"
@ -3160,7 +3163,7 @@ Breaking change betweeen =mu4e-alert= and =mu= :(
I prefer text/plain, over everything >:)
#+begin_src emacs-lisp
(with-eval-after-load "mm-decode"
(with-eval-after-load "mm-decode"
(add-to-list 'mm-discouraged-alternatives "text/richtext")
(add-to-list 'mm-discouraged-alternatives "text/html"))
#+end_src
@ -3239,7 +3242,7 @@ Only ask whether to reply to all if there are more than one recipients
* Buffers and Windows
** COMMENT Workspaces (Persepective
#+begin_src emacs-lisp
(use-package persp-mode
(use-package persp-mode
:defer t
:config
(setq persp-keymap-prefix (kbd "SPC <tab>"))