update
This commit is contained in:
349
config.el
349
config.el
@@ -1,112 +1,107 @@
|
||||
;;; $DOOMDIR/config.el -*- lexical-binding: t; -*-
|
||||
|
||||
;; Place your private configuration here! Remember, you do not need to run 'doom
|
||||
;; sync' after modifying this file!
|
||||
;; --------------------------------------------------
|
||||
;; Theme / UI
|
||||
;; --------------------------------------------------
|
||||
(setq doom-theme 'tango-dark
|
||||
display-line-numbers-type t
|
||||
doom-font (font-spec :family "JetBrains Mono" :size 14)
|
||||
doom-variable-pitch-font nil)
|
||||
|
||||
;; --------------------------------------------------
|
||||
;; macOS / UX
|
||||
;; --------------------------------------------------
|
||||
(setq mouse-autoselect-window t
|
||||
focus-follows-mouse t
|
||||
select-enable-clipboard t
|
||||
select-enable-primary t
|
||||
inhibit-splash-screen t)
|
||||
|
||||
;; Some functionality uses this to identify you, e.g. GPG configuration, email
|
||||
;; clients, file templates and snippets. It is optional.
|
||||
;; (setq user-full-name "John Doe"
|
||||
;; user-mail-address "john@doe.com")
|
||||
;; --------------------------------------------------
|
||||
;; Completion (Company) – minimum, bezpečné
|
||||
;; --------------------------------------------------
|
||||
(after! company
|
||||
(setq company-idle-delay 0.1
|
||||
company-minimum-prefix-length 2
|
||||
company-selection-wrap-around t
|
||||
company-tooltip-limit 14
|
||||
company-show-numbers t
|
||||
company-require-match nil)
|
||||
|
||||
;; Doom exposes five (optional) variables for controlling fonts in Doom:
|
||||
;;
|
||||
;; - `doom-font' -- the primary font to use
|
||||
;; - `doom-variable-pitch-font' -- a non-monospace font (where applicable)
|
||||
;; - `doom-big-font' -- used for `doom-big-font-mode'; use this for
|
||||
;; presentations or streaming.
|
||||
;; - `doom-symbol-font' -- for symbols
|
||||
;; - `doom-serif-font' -- for the `fixed-pitch-serif' face
|
||||
;;
|
||||
;; See 'C-h v doom-font' for documentation and more examples of what they
|
||||
;; accept. For example:
|
||||
;;
|
||||
;;(setq doom-font (font-spec :family "Fira Code" :size 12 :weight 'semi-light)
|
||||
;; doom-variable-pitch-font (font-spec :family "Fira Sans" :size 13))
|
||||
;;
|
||||
;; If you or Emacs can't find your font, use 'M-x describe-font' to look them
|
||||
;; up, `M-x eval-region' to execute elisp code, and 'M-x doom/reload-font' to
|
||||
;; refresh your font settings. If Emacs still can't find your font, it likely
|
||||
;; wasn't installed correctly. Font issues are rarely Doom issues!
|
||||
;; Spolehlivé vyvolání v TTY
|
||||
(map! :i "C-." #'company-complete
|
||||
:n "C-." #'company-complete))
|
||||
|
||||
;; There are two ways to load a theme. Both assume the theme is installed and
|
||||
;; available. You can either set `doom-theme' or manually load a theme with the
|
||||
;; `load-theme' function. This is the default:
|
||||
(setq doom-theme 'doom-one)
|
||||
;; --------------------------------------------------
|
||||
;; Robustní file completion "kdekoliv pod kurzorem"
|
||||
;; Funguje i v Markdown odkazu [x](./tady), protože neřeší kontext – jen token okolo pointu.
|
||||
;; --------------------------------------------------
|
||||
(defun martin/complete-file-name-at-point ()
|
||||
"Doplň název souboru kolem kurzoru pomocí standardní file completion tabulky.
|
||||
|
||||
;; This determines the style of line numbers in effect. If set to `nil', line
|
||||
;; numbers are disabled. For relative line numbers, set this to `relative'.
|
||||
(setq display-line-numbers-type t)
|
||||
Funguje v libovolném textu, včetně Markdown linků (např. [x](./...))."
|
||||
(interactive)
|
||||
(let* ((stop-chars '(?\s ?\t ?\n ?\r ?\" ?\' ?\( ?\) ?\[ ?\] ?\< ?\> ?\{ ?\} ?, ?;))
|
||||
(start (save-excursion
|
||||
(while (and (> (point) (point-min))
|
||||
(let ((c (char-before)))
|
||||
(and c (not (memq c stop-chars)))))
|
||||
(backward-char))
|
||||
(point)))
|
||||
(end (save-excursion
|
||||
(while (and (< (point) (point-max))
|
||||
(let ((c (char-after)))
|
||||
(and c (not (memq c stop-chars)))))
|
||||
(forward-char))
|
||||
(point))))
|
||||
;; Pokud nejsme "na tokenu", vezmi aspoň start=end=point (doplň odtud)
|
||||
(when (= start end)
|
||||
(setq start (point) end (point)))
|
||||
(let ((completion-category-defaults nil)
|
||||
(completion-category-overrides '((file (styles basic partial-completion)))))
|
||||
(completion-in-region start end #'completion-file-name-table))))
|
||||
|
||||
;; If you use `org' and don't want your org files in the default location below,
|
||||
;; change `org-directory'. It must be set before org loads!
|
||||
(setq org-directory "~/org/")
|
||||
;; Globální klávesa (funguje všude, i v TTY)
|
||||
(map! :i "C-c f" #'martin/complete-file-name-at-point
|
||||
:n "C-c f" #'martin/complete-file-name-at-point)
|
||||
|
||||
;; V Markdownu snížíme prefix, ať to jde hned po `./`
|
||||
(after! markdown-mode
|
||||
(add-hook 'markdown-mode-hook (lambda () (setq-local company-minimum-prefix-length 1)))
|
||||
(add-hook 'gfm-mode-hook (lambda () (setq-local company-minimum-prefix-length 1))))
|
||||
|
||||
;; Whenever you reconfigure a package, make sure to wrap your config in an
|
||||
;; `after!' block, otherwise Doom's defaults may override your settings. E.g.
|
||||
;;
|
||||
;; (after! PACKAGE
|
||||
;; (setq x y))
|
||||
;;
|
||||
;; The exceptions to this rule:
|
||||
;;
|
||||
;; - Setting file/directory variables (like `org-directory')
|
||||
;; - Setting variables which explicitly tell you to set them before their
|
||||
;; package is loaded (see 'C-h v VARIABLE' to look up their documentation).
|
||||
;; - Setting doom variables (which start with 'doom-' or '+').
|
||||
;;
|
||||
;; Here are some additional functions/macros that will help you configure Doom.
|
||||
;;
|
||||
;; - `load!' for loading external *.el files relative to this one
|
||||
;; - `use-package!' for configuring packages
|
||||
;; - `after!' for running code after a package has loaded
|
||||
;; - `add-load-path!' for adding directories to the `load-path', relative to
|
||||
;; this file. Emacs searches the `load-path' when you load packages with
|
||||
;; `require' or `use-package'.
|
||||
;; - `map!' for binding new keys
|
||||
;;
|
||||
;; To get information about any of these functions/macros, move the cursor over
|
||||
;; the highlighted symbol at press 'K' (non-evil users must press 'C-c c k').
|
||||
;; This will open documentation for it, including demos of how they are used.
|
||||
;; Alternatively, use `C-h o' to look up a symbol (functions, variables, faces,
|
||||
;; etc).
|
||||
;;
|
||||
;; You can also try 'gd' (or 'C-c c d') to jump to their definition and see how
|
||||
;; they are implemented.
|
||||
|
||||
|
||||
;; Theme
|
||||
(setq doom-theme 'doom-moonlight)
|
||||
(setq doom-font (font-spec :family "JetBrains Mono" :size 14))
|
||||
(setq doom-variable-pitch-font nil)
|
||||
|
||||
|
||||
;; Accessibility
|
||||
;; macOS focus & mouse behavior
|
||||
(setq mouse-autoselect-window t)
|
||||
(setq focus-follows-mouse t)
|
||||
|
||||
;; smoother focus handling
|
||||
(setq select-enable-clipboard t)
|
||||
(setq select-enable-primary t)
|
||||
|
||||
;; prevent weird focus stealing
|
||||
(setq inhibit-splash-screen t)
|
||||
|
||||
;; --------------------------------------------------
|
||||
;; Copilot
|
||||
;; accept completion from copilot and fallback to company
|
||||
;; --------------------------------------------------
|
||||
(use-package! copilot
|
||||
:hook (prog-mode . copilot-mode)
|
||||
:bind (:map copilot-completion-map
|
||||
("<tab>" . 'copilot-accept-completion)
|
||||
("TAB" . 'copilot-accept-completion)
|
||||
("C-TAB" . 'copilot-accept-completion-by-word)
|
||||
("C-<tab>" . 'copilot-accept-completion-by-word)))
|
||||
("<tab>" . copilot-accept-completion)
|
||||
("TAB" . copilot-accept-completion)
|
||||
("C-TAB" . copilot-accept-completion-by-word)
|
||||
("C-<tab>" . copilot-accept-completion-by-word)))
|
||||
|
||||
;; --------------------------------------------------
|
||||
;; Org
|
||||
;; --------------------------------------------------
|
||||
(setq org-directory "~/org/")
|
||||
|
||||
;; Org mode
|
||||
(after! org
|
||||
(setq org-default-notes-file (expand-file-name "inbox.org" org-directory))
|
||||
|
||||
(setq org-agenda-files (list org-directory
|
||||
(expand-file-name "projects" org-directory)
|
||||
(expand-file-name "notes" org-directory)))
|
||||
|
||||
(setq org-todo-keywords
|
||||
'((sequence "TODO(t)" "NEXT(n)" "WAIT(w@/!)" "|" "DONE(d!)" "CANCELLED(c@)")))
|
||||
|
||||
(setq org-log-done 'time)
|
||||
|
||||
(setq org-refile-targets '((org-agenda-files :maxlevel . 5))
|
||||
org-outline-path-complete-in-steps nil
|
||||
org-refile-use-outline-path 'file)
|
||||
|
||||
(defun my/project-org-file ()
|
||||
"Return path to ./project.org in current Projectile project, if it exists."
|
||||
(when-let ((root (projectile-project-root)))
|
||||
@@ -118,36 +113,9 @@
|
||||
(interactive)
|
||||
(let ((org-agenda-files (delq nil (list (my/project-org-file)))))
|
||||
(if org-agenda-files
|
||||
(org-agenda nil "a") ;; standard agenda dispatcher
|
||||
(user-error "No project.org found in this project")))))
|
||||
(org-agenda nil "a")
|
||||
(user-error "No project.org found in this project"))))
|
||||
|
||||
;; Org mode
|
||||
(setq org-directory "~/org/")
|
||||
|
||||
(after! org
|
||||
;; Inbox jako default pro rychlé poznámky / capture
|
||||
(setq org-default-notes-file (expand-file-name "inbox.org" org-directory))
|
||||
|
||||
;; Agenda sbírá soubory i z adresářů (vezme všechny .org uvnitř)
|
||||
(setq org-agenda-files (list org-directory
|
||||
(expand-file-name "projects" org-directory)
|
||||
(expand-file-name "notes" org-directory)))
|
||||
|
||||
;; Doporučené “GTD-lite” stavy
|
||||
(setq org-todo-keywords
|
||||
'((sequence "TODO(t)" "NEXT(n)" "WAIT(w@/!)" "|" "DONE(d!)" "CANCELLED(c@)")))
|
||||
|
||||
;; Logování dokončení
|
||||
(setq org-log-done 'time)
|
||||
|
||||
;; Refile cíle (přesouvání z inboxu do projektů/notes)
|
||||
(setq org-refile-targets
|
||||
`((,(expand-file-name "projects" org-directory) :maxlevel . 3)
|
||||
(,(expand-file-name "notes" org-directory) :maxlevel . 3)
|
||||
(,(expand-file-name "agenda.org" org-directory):maxlevel . 3))))
|
||||
|
||||
;; Org - capture templates
|
||||
(after! org
|
||||
(setq org-capture-templates
|
||||
'(("i" "Inbox task" entry
|
||||
(file "inbox.org")
|
||||
@@ -159,67 +127,37 @@
|
||||
(file "inbox.org")
|
||||
"* TODO %? :project:\n%U\n%a\n"))))
|
||||
|
||||
(setq org-directory "~/org/")
|
||||
|
||||
(after! org
|
||||
(setq org-agenda-files (list org-directory
|
||||
(expand-file-name "projects" org-directory)
|
||||
(expand-file-name "notes" org-directory)))
|
||||
|
||||
;; Refile cíle = všechny soubory z org-agenda-files
|
||||
(setq org-refile-targets '((org-agenda-files :maxlevel . 5)))
|
||||
|
||||
;; Doporučené UX pro refile
|
||||
(setq org-outline-path-complete-in-steps nil
|
||||
org-refile-use-outline-path 'file))
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
;; --------------------------------------------------
|
||||
;; Dired
|
||||
;; --------------------------------------------------
|
||||
(after! dired
|
||||
;; povolit přepisování dired bufferu
|
||||
(put 'dired-find-alternate-file 'disabled nil)
|
||||
|
||||
;; RET = otevřít ve stejném bufferu
|
||||
(map!
|
||||
:map dired-mode-map
|
||||
"RET" #'dired-find-alternate-file
|
||||
"^" #'dired-up-directory))
|
||||
|
||||
;; --- plantuml přes oficiální server (Doom Emacs) ---
|
||||
(after! plantuml-mode
|
||||
(setq plantuml-default-exec-mode 'server) ;; použít server
|
||||
(setq plantuml-server-url "https://www.plantuml.com/plantuml") ;; správná base URL
|
||||
(setq plantuml-server-encode-mode 'deflate) ;; 'deflate nebo 'hex
|
||||
(setq plantuml-output-type "svg") ;; "svg" nebo "png"
|
||||
;; volitelné ladění - při problému koukni do *Messages*
|
||||
(setq plantuml-verbose t)
|
||||
)
|
||||
(map! :map dired-mode-map
|
||||
"RET" #'dired-find-alternate-file
|
||||
"^" #'dired-up-directory))
|
||||
|
||||
;; --------------------------------------------------
|
||||
;; PlantUML server render (HEX encoding, macOS safe)
|
||||
;; PlantUML (server) — TVOJE PŮVODNÍ ČÁST
|
||||
;; --------------------------------------------------
|
||||
|
||||
(add-to-list 'auto-mode-alist '("\\.puml\\'" . plantuml-mode))
|
||||
(add-to-list 'auto-mode-alist '("\\.plantuml\\'" . plantuml-mode))
|
||||
|
||||
(after! plantuml-mode
|
||||
(setq plantuml-default-exec-mode 'server)
|
||||
(setq plantuml-server-url "https://www.plantuml.com/plantuml"))
|
||||
(setq plantuml-default-exec-mode 'server
|
||||
plantuml-server-url "https://www.plantuml.com/plantuml"
|
||||
plantuml-output-type "svg"
|
||||
plantuml-verbose t))
|
||||
|
||||
(defun my/plantuml-encode-hex (text)
|
||||
"PlantUML HEX encoding: ~h + hex(UTF-8 bytes)."
|
||||
(let* ((utf8 (encode-coding-string text 'utf-8 t)))
|
||||
(concat
|
||||
"~h"
|
||||
(apply #'concat
|
||||
(mapcar (lambda (b) (format "%02x" b))
|
||||
(append utf8 nil))))))
|
||||
(concat "~h"
|
||||
(apply #'concat
|
||||
(mapcar (lambda (b) (format "%02x" b))
|
||||
(append utf8 nil))))))
|
||||
|
||||
(defun my/plantuml-fix-png-header (file)
|
||||
"Odstraní vše před PNG signaturou (řeší \n před 89 50 4E 47)."
|
||||
"Odstraní vše před PNG signaturou (řeší \\n před 89 50 4E 47)."
|
||||
(let ((sig (unibyte-string #x89 ?P ?N ?G ?\r ?\n #x1a ?\n)))
|
||||
(with-temp-buffer
|
||||
(set-buffer-multibyte nil)
|
||||
@@ -227,8 +165,7 @@
|
||||
(goto-char (point-min))
|
||||
(unless (looking-at (regexp-quote sig))
|
||||
(let ((pos (search-forward sig nil t)))
|
||||
(unless pos
|
||||
(user-error "PNG signature nenalezena"))
|
||||
(unless pos (user-error "PNG signature nenalezena"))
|
||||
(delete-region (point-min) (- pos (length sig)))
|
||||
(let ((coding-system-for-write 'binary))
|
||||
(write-region (point-min) (point-max) file nil 'silent)))))))
|
||||
@@ -236,16 +173,13 @@
|
||||
(defun my/plantuml-render-server (type)
|
||||
"Render aktuální .puml přes PlantUML server do PNG nebo SVG."
|
||||
(interactive (list (completing-read "Type: " '("png" "svg") nil t "png")))
|
||||
(unless buffer-file-name
|
||||
(user-error "Otevři .puml jako soubor"))
|
||||
(unless buffer-file-name (user-error "Otevři .puml jako soubor"))
|
||||
(let* ((text (buffer-substring-no-properties (point-min) (point-max)))
|
||||
(encoded (my/plantuml-encode-hex text))
|
||||
(server (string-remove-suffix "/" plantuml-server-url))
|
||||
(url (format "%s/%s/%s" server type encoded))
|
||||
(out (concat (file-name-sans-extension buffer-file-name) "." type)))
|
||||
;; stáhne binárně korektně
|
||||
(url-copy-file url out t)
|
||||
;; oprav PNG header (macOS + PlantUML server občas pošle LF)
|
||||
(when (string-equal type "png")
|
||||
(my/plantuml-fix-png-header out))
|
||||
(message "PlantUML uložen: %s" out)
|
||||
@@ -257,45 +191,48 @@
|
||||
(define-key plantuml-mode-map (kbd "C-c C-s")
|
||||
(lambda () (interactive) (my/plantuml-render-server "svg"))))
|
||||
|
||||
|
||||
;; ============================================================
|
||||
;; Markdown: file completion (images) using company
|
||||
;; ============================================================
|
||||
|
||||
(after! markdown-mode
|
||||
(add-hook 'markdown-mode-hook
|
||||
(lambda ()
|
||||
;; Enable file completion (images) in markdown
|
||||
(setq-local company-backends
|
||||
'((company-files company-capf company-dabbrev))))))
|
||||
|
||||
(after! company
|
||||
;; Make completion feel instant
|
||||
(setq company-idle-delay 0
|
||||
company-minimum-prefix-length 1))
|
||||
|
||||
|
||||
;; --- Markdown: file completion přes Corfu/CAPF (Variant A) ---
|
||||
(after! markdown-mode
|
||||
(add-hook 'markdown-mode-hook
|
||||
(lambda ()
|
||||
;; Přidá doplňování souborů pro cesty (např. )
|
||||
(add-hook 'completion-at-point-functions #'cape-file nil t))))
|
||||
|
||||
|
||||
|
||||
;; -- quick PATH fix for MacTeX --
|
||||
;; --------------------------------------------------
|
||||
;; PATH fix for MacTeX
|
||||
;; --------------------------------------------------
|
||||
(setenv "PATH" (concat "/Library/TeX/texbin:" (getenv "PATH")))
|
||||
(add-to-list 'exec-path "/Library/TeX/texbin")
|
||||
;; -- end quick PATH fix --
|
||||
|
||||
|
||||
|
||||
|
||||
;; vždy používej python3
|
||||
;; --------------------------------------------------
|
||||
;; Python
|
||||
;; --------------------------------------------------
|
||||
(setq python-shell-interpreter "python3")
|
||||
|
||||
(after! org
|
||||
(setq org-babel-python-command "python3")
|
||||
(require 'ob-python))
|
||||
|
||||
|
||||
|
||||
;; --------------------------------------------------
|
||||
;; Low-vision základ
|
||||
;; --------------------------------------------------
|
||||
|
||||
;; Větší font + pohodlnější řádkování
|
||||
(setq doom-font (font-spec :family "JetBrains Mono" :size 20) ;; zkus 18–24
|
||||
doom-variable-pitch-font (font-spec :family "SF Pro Text" :size 20))
|
||||
|
||||
(setq-default line-spacing 0.25) ;; 0.20–0.35 dle chuti
|
||||
|
||||
;; Jednoduché zvětšení/zmenšení textu kdykoliv
|
||||
(map! :n "C-=" #'text-scale-increase
|
||||
:n "C--" #'text-scale-decrease
|
||||
:n "C-0" #'text-scale-set
|
||||
:i "C-=" #'text-scale-increase
|
||||
:i "C--" #'text-scale-decrease
|
||||
:i "C-0" #'text-scale-set)
|
||||
|
||||
|
||||
;; Automaticky ukládej org soubory po refilingu a změnách
|
||||
(add-hook 'org-after-refile-insert-hook #'save-buffer)
|
||||
(add-hook 'org-after-todo-state-change-hook #'save-buffer)
|
||||
(add-hook 'org-capture-after-finalize-hook #'save-buffer)
|
||||
|
||||
(run-with-idle-timer
|
||||
300 t
|
||||
(lambda ()
|
||||
(save-some-buffers t (lambda ()
|
||||
(derived-mode-p 'org-mode)))))
|
||||
|
||||
226
init.el
226
init.el
@@ -1,199 +1,79 @@
|
||||
;;; init.el -*- lexical-binding: t; -*-
|
||||
|
||||
;; This file controls what Doom modules are enabled and what order they load
|
||||
;; in. Remember to run 'doom sync' after modifying it!
|
||||
|
||||
;; NOTE Press 'SPC h d h' (or 'C-h d h' for non-vim users) to access Doom's
|
||||
;; documentation. There you'll find a link to Doom's Module Index where all
|
||||
;; of our modules are listed, including what flags they support.
|
||||
|
||||
;; NOTE Move your cursor over a module's name (or its flags) and press 'K' (or
|
||||
;; 'C-c c k' for non-vim users) to view its documentation. This works on
|
||||
;; flags as well (those symbols that start with a plus).
|
||||
;;
|
||||
;; Alternatively, press 'gd' (or 'C-c c d') on a module to browse its
|
||||
;; directory (for easy access to its source code).
|
||||
|
||||
(doom! :input
|
||||
;;bidi ; (tfel ot) thgir etirw uoy gnipleh
|
||||
;;chinese
|
||||
;;japanese
|
||||
;;layout ; auie,ctsrnm is the superior home row
|
||||
|
||||
:completion
|
||||
company ; the ultimate code completion backend
|
||||
(corfu +orderless) ; complete with cap(f), cape and a flying feather!
|
||||
;;helm ; the *other* search engine for love and life
|
||||
;;ido ; the other *other* search engine...
|
||||
;;ivy ; a search engine for love and life
|
||||
vertico ; the search engine of the future
|
||||
company
|
||||
vertico
|
||||
|
||||
:ui
|
||||
;;deft ; notational velocity for Emacs
|
||||
doom ; what makes DOOM look the way it does
|
||||
doom-dashboard ; a nifty splash screen for Emacs
|
||||
;;doom-quit ; DOOM quit-message prompts when you quit Emacs
|
||||
;;(emoji +unicode) ; 🙂
|
||||
hl-todo ; highlight TODO/FIXME/NOTE/DEPRECATED/HACK/REVIEW
|
||||
;;indent-guides ; highlighted indent columns
|
||||
;;ligatures ; ligatures and symbols to make your code pretty again
|
||||
;;minimap ; show a map of the code on the side
|
||||
modeline ; snazzy, Atom-inspired modeline, plus API
|
||||
;;nav-flash ; blink cursor line after big motions
|
||||
;;neotree ; a project drawer, like NERDTree for vim
|
||||
ophints ; highlight the region an operation acts on
|
||||
(popup +defaults) ; tame sudden yet inevitable temporary windows
|
||||
;;smooth-scroll ; So smooth you won't believe it's not butter
|
||||
;;tabs ; a tab bar for Emacs
|
||||
;;treemacs ; a project drawer, like neotree but cooler
|
||||
;;unicode ; extended unicode support for various languages
|
||||
(vc-gutter +pretty) ; vcs diff in the fringe
|
||||
vi-tilde-fringe ; fringe tildes to mark beyond EOB
|
||||
;;window-select ; visually switch windows
|
||||
workspaces ; tab emulation, persistence & separate workspaces
|
||||
;;zen ; distraction-free coding or writing
|
||||
doom
|
||||
doom-dashboard
|
||||
hl-todo
|
||||
modeline
|
||||
ophints
|
||||
(popup +defaults)
|
||||
(vc-gutter +pretty)
|
||||
vi-tilde-fringe
|
||||
workspaces
|
||||
|
||||
:editor
|
||||
(evil +everywhere); come to the dark side, we have cookies
|
||||
file-templates ; auto-snippets for empty files
|
||||
fold ; (nigh) universal code folding
|
||||
;;(format +onsave) ; automated prettiness
|
||||
;;god ; run Emacs commands without modifier keys
|
||||
;;lispy ; vim for lisp, for people who don't like vim
|
||||
;;multiple-cursors ; editing in many places at once
|
||||
;;objed ; text object editing for the innocent
|
||||
;;parinfer ; turn lisp into python, sort of
|
||||
;;rotate-text ; cycle region at point between text candidates
|
||||
snippets ; my elves. They type so I don't have to
|
||||
(whitespace +guess +trim) ; a butler for your whitespace
|
||||
;;word-wrap ; soft wrapping with language-aware indent
|
||||
(evil +everywhere)
|
||||
file-templates
|
||||
fold
|
||||
snippets
|
||||
(whitespace +guess +trim)
|
||||
|
||||
:emacs
|
||||
dired ; making dired pretty [functional]
|
||||
electric ; smarter, keyword-based electric-indent
|
||||
;;eww ; the internet is gross
|
||||
;;ibuffer ; interactive buffer management
|
||||
tramp ; remote files at your arthritic fingertips
|
||||
undo ; persistent, smarter undo for your inevitable mistakes
|
||||
vc ; version-control and Emacs, sitting in a tree
|
||||
dired
|
||||
electric
|
||||
tramp
|
||||
undo
|
||||
vc
|
||||
|
||||
:term
|
||||
;;eshell ; the elisp shell that works everywhere
|
||||
;;shell ; simple shell REPL for Emacs
|
||||
;;term ; basic terminal emulator for Emacs
|
||||
vterm ; the best terminal emulation in Emacs
|
||||
vterm
|
||||
|
||||
:checkers
|
||||
syntax ; tasing you for every semicolon you forget
|
||||
(spell +flyspell) ; tasing you for misspelling mispelling
|
||||
grammar ; tasing grammar mistake every you make
|
||||
syntax
|
||||
(spell +flyspell)
|
||||
grammar
|
||||
|
||||
:tools
|
||||
ansible
|
||||
biblio ; Writes a PhD for you (citation needed)
|
||||
;;collab ; buffers with friends
|
||||
debugger ; FIXME stepping through code, to help you add bugs
|
||||
;;direnv
|
||||
biblio
|
||||
debugger
|
||||
docker
|
||||
;;editorconfig ; let someone else argue about tabs vs spaces
|
||||
;;ein ; tame Jupyter notebooks with emacs
|
||||
(eval +overlay) ; run code, run (also, repls)
|
||||
lookup ; navigate your code and its documentation
|
||||
;;llm ; when I said you needed friends, I didn't mean...
|
||||
;;(lsp +eglot) ; M-x vscode
|
||||
magit ; a git porcelain for Emacs
|
||||
make ; run make tasks from Emacs
|
||||
;;pass ; password manager for nerds
|
||||
pdf ; pdf enhancements
|
||||
;;terraform ; infrastructure as code
|
||||
tmux ; an API for interacting with tmux
|
||||
;;tree-sitter ; syntax and parsing, sitting in a tree...
|
||||
upload ; map local to remote projects via ssh/ftp
|
||||
(eval +overlay)
|
||||
lookup
|
||||
(lsp +eglot) ;; <- pro “chytrý” completion přes CAPF
|
||||
magit
|
||||
make
|
||||
pdf
|
||||
tmux
|
||||
upload
|
||||
|
||||
:os
|
||||
(:if (featurep :system 'macos) macos) ; improve compatibility with macOS
|
||||
;;tty ; improve the terminal Emacs experience
|
||||
(:if (featurep :system 'macos) macos)
|
||||
|
||||
:lang
|
||||
;;ada ; In strong typing we (blindly) trust
|
||||
;;agda ; types of types of types of types...
|
||||
;;beancount ; mind the GAAP
|
||||
;;(cc +lsp) ; C > C++ == 1
|
||||
;;clojure ; java with a lisp
|
||||
;;common-lisp ; if you've seen one lisp, you've seen them all
|
||||
;;coq ; proofs-as-programs
|
||||
;;crystal ; ruby at the speed of c
|
||||
;;csharp ; unity, .NET, and mono shenanigans
|
||||
data ; config/data formats
|
||||
;;(dart +flutter) ; paint ui and not much else
|
||||
;;dhall
|
||||
;;elixir ; erlang done right
|
||||
;;elm ; care for a cup of TEA?
|
||||
emacs-lisp ; drown in parentheses
|
||||
;;erlang ; an elegant language for a more civilized age
|
||||
;;ess ; emacs speaks statistics
|
||||
;;factor
|
||||
;;faust ; dsp, but you get to keep your soul
|
||||
;;fortran ; in FORTRAN, GOD is REAL (unless declared INTEGER)
|
||||
;;fsharp ; ML stands for Microsoft's Language
|
||||
;;fstar ; (dependent) types and (monadic) effects and Z3
|
||||
;;gdscript ; the language you waited for
|
||||
(go +lsp) ; the hipster dialect
|
||||
;;(graphql +lsp) ; Give queries a REST
|
||||
;;(haskell +lsp) ; a language that's lazier than I am
|
||||
;;hy ; readability of scheme w/ speed of python
|
||||
;;idris ; a language you can depend on
|
||||
json ; At least it ain't XML
|
||||
;;janet ; Fun fact: Janet is me!
|
||||
;;(java +lsp) ; the poster child for carpal tunnel syndrome
|
||||
javascript ; all(hope(abandon(ye(who(enter(here))))))
|
||||
;;julia ; a better, faster MATLAB
|
||||
;;kotlin ; a better, slicker Java(Script)
|
||||
latex ; writing papers in Emacs has never been so fun
|
||||
;;lean ; for folks with too much to prove
|
||||
;;ledger ; be audit you can be
|
||||
lua ; one-based indices? one-based indices
|
||||
markdown ; writing docs for people to ignore
|
||||
;;nim ; python + lisp at the speed of c
|
||||
;;nix ; I hereby declare "nix geht mehr!"
|
||||
;;ocaml ; an objective camel
|
||||
org ; organize your plain life in plain text
|
||||
;;php ; perl's insecure younger brother
|
||||
plantuml ; diagrams for confusing people more
|
||||
;;graphviz ; diagrams for confusing yourself even more
|
||||
;;purescript ; javascript, but functional
|
||||
python ; beautiful is better than ugly
|
||||
;;qt ; the 'cutest' gui framework ever
|
||||
;;racket ; a DSL for DSLs
|
||||
;;raku ; the artist formerly known as perl6
|
||||
rest ; Emacs as a REST client
|
||||
;;rst ; ReST in peace
|
||||
;;(ruby +rails) ; 1.step {|i| p "Ruby is #{i.even? ? 'love' : 'life'}"}
|
||||
;;(rust +lsp) ; Fe2O3.unwrap().unwrap().unwrap().unwrap()
|
||||
;;scala ; java, but good
|
||||
;;(scheme +guile) ; a fully conniving family of lisps
|
||||
sh ; she sells {ba,z,fi}sh shells on the C xor
|
||||
;;sml
|
||||
;;solidity ; do you need a blockchain? No.
|
||||
;;swift ; who asked for emoji variables?
|
||||
terra ; Earth and Moon in alignment for performance.
|
||||
web ; the tubes
|
||||
yaml ; JSON, but readable
|
||||
;;zig ; C, but simpler
|
||||
|
||||
:email
|
||||
;;(mu4e +org +gmail)
|
||||
;;notmuch
|
||||
;;(wanderlust +gmail)
|
||||
|
||||
:app
|
||||
;;calendar
|
||||
;;emms
|
||||
;;everywhere ; *leave* Emacs!? You must be joking
|
||||
;;irc ; how neckbeards socialize
|
||||
;;(rss +org) ; emacs as an RSS reader
|
||||
data
|
||||
emacs-lisp
|
||||
(go +lsp)
|
||||
json
|
||||
javascript
|
||||
latex
|
||||
lua
|
||||
markdown
|
||||
org
|
||||
(perl +lsp) ;; <- perl completion přes LSP (pokud máš server)
|
||||
plantuml
|
||||
(python +lsp) ;; <- python completion přes LSP (pyright apod.)
|
||||
rest
|
||||
sh
|
||||
terra
|
||||
web
|
||||
yaml
|
||||
|
||||
:config
|
||||
;;literate
|
||||
(default +bindings +smartparens))
|
||||
|
||||
|
||||
@@ -58,4 +58,3 @@
|
||||
(package! copilot
|
||||
:recipe (:host github :repo "copilot-emacs/copilot.el" :files ("*.el" "dist")))
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user