diff --git a/emacs/.config/emacs/Emacs.org b/emacs/.config/emacs/Emacs.org index be7e58e..05684f2 100644 --- a/emacs/.config/emacs/Emacs.org +++ b/emacs/.config/emacs/Emacs.org @@ -318,13 +318,36 @@ #+begin_src emacs-lisp (use-package haskell-mode) #+end_src + +** OCaml +#+begin_src emacs-lisp + (use-package tuareg + :mode (("\\.ocamlinit\\'" . tuareg-mode))) +#+end_src + ** Rust #+begin_src emacs-lisp (use-package rust-mode - :init - (setq rust-mode-treesitter-derive t) :hook (rust-mode-hook . eglot-ensure)) + + (use-package eglot + :straight (:type built-in) + :bind (:map eglot-mode-map + ("C-c C-l r" . eglot-rename) + ("C-c C-l f" . eglot-format-buffer) + ("C-c C-l a" . eglot-code-actions) + ("C-c C-l q" . eglot-code-action-quickfix) + ("C-c C-l d" . xref-find-definitions) + ("C-c C-l i" . eglot-find-implementation) + ("C-c C-l t" . eglot-find-type-definition) + ("C-c C-l s" . xref-find-references) + ("C-c C-l h" . eldoc) + ("C-c C-l R" . eglot-restart-process) + ("C-c C-l e" . eglot-errors-at-point)) + (:map flymake-mode-map + ("M-n" . flymake-goto-next-error) + ("M-p" . flymake-goto-prev-error))) #+end_src ** KDL (For niri) @@ -478,6 +501,18 @@ I'm using the fork as described [[https://abode.karthinks.com/org-latex-preview/ (org-mode . flyspell-mode) (org-mode . org-latex-preview-auto-mode)) #+end_src +** toki pona support +#+begin_src emacs-lisp + (with-eval-after-load 'ox + (add-to-list 'org-export-dictionary + '("Footnotes" ("tok" :default "toki anpa"))) + (add-to-list 'org-export-dictionary + '("Author" ("tok" :default "jan toki"))) + (add-to-list 'org-export-dictionary + '("Table of Contents" ("tok" :default "ni li lon lipu ni:"))) + (add-to-list 'org-export-dictionary + '("Created" ("tok" :default "mi pali e ni lon tenpo")))) +#+end_src ** Prettify #+begin_src emacs-lisp (use-package org-modern @@ -486,8 +521,8 @@ I'm using the fork as described [[https://abode.karthinks.com/org-latex-preview/ #+end_src ** Org Bloggy stuff #+begin_src emacs-lisp - (defconst my-blog-org-dir "~/Documents/test/blog/org/") - (defconst my-blog-public-dir "~/Documents/test/blog/html") + (defconst my-blog-org-dir "~/repos/blog/org/") + (defconst my-blog-public-dir "~/repos/blog/html") (setq org-publish-project-alist `(("my-logic-blog" @@ -502,7 +537,8 @@ I'm using the fork as described [[https://abode.karthinks.com/org-latex-preview/ :sitemap-style list :html-head "" :html-preamble t - :html-preamble-format (("en" "
← Back to Blog Index
")) + :html-preamble-format (("en" "
← Back to Blog Index
") + ("tok" "
← o tawa monsi
")) ) ("my-logic-blog-static"