refactor(config): full cleanup - English comments, no duplicates, org-modern fixed

Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
This commit is contained in:
2026-02-23 19:39:31 +01:00
parent bcf82f0f4a
commit 25f7dc72ea

View File

@@ -260,6 +260,13 @@ Bound to cmd+v in org-mode and markdown-mode."
(add-hook 'org-export-before-processing-hook
(lambda (_backend) (org-update-all-dblocks)))
;; Visual: hide markup, pretty entities, compact tags
(setq org-hide-emphasis-markers t
org-pretty-entities t
org-ellipsis ""
org-auto-align-tags nil
org-tags-column 0)
;; Restore window layout after capture quit
(setq org-capture-restore-window-after-quit t))
@@ -672,8 +679,7 @@ and optional priority indicator [#A]."
;;; ============================================================
(after! tramp
(setq projectile-git-command "git ls-files -zco --exclude-standard"
projectile-indexing-method 'alien))
(setq projectile-git-command "git ls-files -zco --exclude-standard"))
;; Disable VC and Projectile over TRAMP — main cause of hangs
(setq vc-ignore-dir-regexp
@@ -1114,9 +1120,8 @@ Otherwise: runs interactive ement-connect, then opens rooms after sync."
;;; WRITING — olivetti-mode
;;; ============================================================
;; Guard: buffer-file-name zajisti ze olivetti nebezi v export temp bufferech
;; (ty nemaji prirazeny soubor a volani set-window-margins by selhalo).
;; Corfu popup: pokud se zobrazi mimo obrazovku, vypni olivetti (SPC t o).
;; Guard: buffer-file-name ensures olivetti doesn't run in export temp buffers.
;; Corfu popup: if it renders off-screen, disable olivetti (SPC t o).
(use-package! olivetti
:defer t
:config
@@ -1135,21 +1140,24 @@ Otherwise: runs interactive ement-connect, then opens rooms after sync."
;;; ORG-MODERN
;;; ============================================================
;; with-eval-after-load: spolehlive spusti az po nacteni org, bez Doom lazy-load
;; komplexnosti. require s nil t = bez chyby pokud balicek chybi.
(with-eval-after-load 'org
(when (require 'org-modern nil t)
;;; Org-modern -- modern visual style for org-mode
;; :hook triggers lazy loading via use-package!/straight.el (critical for load-path).
;; org-modern-table nil: table overlays can conflict with LaTeX export.
;; org-agenda-finalize-hook: apply modern style to agenda buffers too.
(use-package! org-modern
:hook (org-mode . org-modern-mode)
:hook (org-agenda-finalize . org-modern-agenda)
:config
(setq org-modern-star '("" "" "" "")
org-modern-table nil
org-modern-checkbox t)
(global-org-modern-mode)))
org-modern-checkbox t))
;;; ============================================================
;;; ORG-FRAGTOG — auto-render LaTeX fragmentů
;;; ORG-FRAGTOG — auto-render LaTeX fragments
;;; ============================================================
;; Guard: pouze v file-backed bufferech, ne v exportních kopích.
;; Guard: only in file-backed buffers, not in export copies.
(use-package! org-fragtog
:after org
:hook (org-mode . my/org-fragtog-maybe))
@@ -1161,12 +1169,11 @@ Otherwise: runs interactive ement-connect, then opens rooms after sync."
;;; ============================================================
;;; ORG-SUPER-AGENDA — skupiny v agenda view
;;; ORG-SUPER-AGENDA — groups in agenda view
;;; ============================================================
;; Pozn.: :deadline (before DATE) vyzaduje absolutni datum nebo evaluaci —
;; v plain quoted listu nefunguje spolehlive. Skupina "Brzy" odebrana.
;; org-super-agenda-mode zapnut az po loadu pres after! (jistejsi nez v :config).
;; Note: :deadline (before DATE) requires absolute date or eval — unreliable in
;; plain quoted list. "Soon" group removed. Mode enabled via after! (safer).
(use-package! org-super-agenda
:after org-agenda
:config
@@ -1188,7 +1195,7 @@ Otherwise: runs interactive ement-connect, then opens rooms after sync."
;;; ============================================================
;;; ORG-NOTER — PDF anotace
;;; ORG-NOTER — PDF annotations
;;; ============================================================
(use-package! org-noter
@@ -1208,7 +1215,7 @@ Otherwise: runs interactive ement-connect, then opens rooms after sync."
(after! gptel
(defun my/gptel-rewrite-region (beg end)
"Pošli označený region do GPTel s instrukcí 'vylepši text' a nahraď odpovědí."
"Send selected region to GPTel with 'improve text' instruction and replace with response."
(interactive "r")
(let ((text (buffer-substring-no-properties beg end)))
(gptel-request
@@ -1219,14 +1226,14 @@ Otherwise: runs interactive ement-connect, then opens rooms after sync."
(delete-region beg end)
(goto-char beg)
(insert response)
(message "GPTel: text vylepšen"))
(message "GPTel: text improved"))
(message "GPTel rewrite failed: %s" (plist-get info :status)))))))
(defun my/gptel-org-heading-prompt ()
"Pošle aktuální org heading + obsah jako kontext do GPTel chatu."
"Send current org heading + content as context to GPTel chat."
(interactive)
(unless (derived-mode-p 'org-mode)
(user-error "Pouze v org-mode"))
(user-error "Only available in org-mode"))
(let* ((heading (org-get-heading t t t t))
(content (save-excursion
(org-back-to-heading t)
@@ -1234,7 +1241,7 @@ Otherwise: runs interactive ement-connect, then opens rooms after sync."
(org-end-of-subtree t t)
(buffer-substring-no-properties beg (point))))))
(gptel content)
(message "GPTel: heading '%s' odeslán jako kontext" heading)))
(message "GPTel: heading '%s' sent as context" heading)))
(map! :leader
(:prefix ("o g" . "GPTel")
@@ -1250,7 +1257,7 @@ Otherwise: runs interactive ement-connect, then opens rooms after sync."
:defer t
:config
(setq git-link-default-branch "master")
;; Přidat podporu pro Gitea na git.apps.sukany.cz
;; Add support for Gitea at git.apps.sukany.cz
(add-to-list 'git-link-remote-alist
'("git\\.apps\\.sukany\\.cz" git-link-gitea))
(add-to-list 'git-link-commit-remote-alist
@@ -1263,9 +1270,9 @@ Otherwise: runs interactive ement-connect, then opens rooms after sync."
;;; ============================================================
;;; FORGE — Gitea integrace
;;; FORGE — Gitea integration
;;; ============================================================
;; Vyžaduje Gitea API token v ~/.authinfo:
;; Requires Gitea API token in ~/.authinfo:
;; machine git.apps.sukany.cz login daneel^forge password <TOKEN>
(after! forge