1
The code relevant to the issue on my config is as follows (sorry for my dumb elisp skills, I'm still quite new to the editor). Lots of thanks in advanced and I hope I have provided the necessary snippets of code.
The config of the base org pkg:
(use-package org
:mode ("\\.txt\\'" . org-mode) ;; Org Mode Everywhere
:gfhook
;; #'org-indent-mode
#'visual-line-mode
#'logos-focus-mode
:general
(:states 'normal :keymaps 'org-mode-map :prefix ","
"e" '(org-edit-src-code :which-key "edit org src block")
"s" '("headings" . consult-org-heading)
"c" '(:ignore t :which-key "literate calc")
"cr" '("calc eval line" . literate-calc-eval-line)
"cb" '("calc eval buffer" . literate-calc-eval-buffer)
"d" '(:ignore t :which-key "denote")
"dc" '("open or create note" . denote-open-or-create)
"dl" '("link or create note" . denote-link-or-create)
"t" '("tangle file" . org-babel-tangle)
"i" '(:ignore t :which-key "insert")
"ih" '("insert heading" . org-insert-heading)
"il" '("insert link" . org-insert-link))
(org-src-mode-map
"C-," '("exit org src editing" . org-edit-src-exit))
:custom
(org-return-follows-link t)
(org-ellipsis " ▾")
(org-hide-emphasis-markers t)
(org-pretty-entities t)
(org-auto-align-tags nil)
(org-special-ctrl-a/e t)
(org-catch-invisible-edits 'show-and-error)
(org-src-preserve-indentation t)
(org-confirm-babel-evaluate nil)
(org-startup-with-inline-images t)
(org-startup-folded t))
The org-modern pkg:
(use-package org-modern
:config
(setq org-modern-hide-stars nil
org-modern-list '((?* . "•")
(?+ . "‣")))
(defun setup/org-correct-src-face ()
(interactive)
(dolist (org-src-face '(org-block-begin-line
org-block-end-line))
(set-face-background org-src-face (face-attribute 'mode-line :background)))
(dolist (org-src-face '(org-block-begin-line
org-block-end-line))
(set-face-attribute org-src-face nil :font oci-variable-pitch-font)))
(global-org-modern-mode))
(use-package org-modern-indent
:elpaca '(org-modern-indent :host github :repo "jdtsmith/org-modern-indent")
:ghook ('org-indent-mode-hook #'org-modern-indent-mode))
(elpaca-wait)
The config of my faces:
(defun setup/org-headings ()
(interactive)
(dolist (face '((org-level-1 . 1.2)
(org-level-2 . 1.1)
(org-level-3 . 1.05)
(org-level-4 . 1.0)
(org-level-5 . 1.1)
(org-level-6 . 1.1)
(org-level-7 . 1.1)
(org-level-8 . 1.1)
(org-document-title . 1.2)))
(set-face-attribute (car face) nil
:font oci-heading-font
:weight 'bold
:height (cdr face))))
(defface org-checkbox-done-text
'((t (:strike-through t :inherit 'variable-pitch)))
"Face for the text part of a checked org-mode checkbox.")
(font-lock-add-keywords
'org-mode
`(("^[ \t]*\\(?:[-+*]\\|[0-9]+[).]\\)[ \t]+\\(\\(?:\\[@\\(?:start:\\)?[0-9]+\\][ \t]*\\)?\\[\\(?:X\\|\\([0-9]+\\)/\\2\\)\\][^\n]*\n\\)"
1 'org-checkbox-done-text prepend))
'append)