[Emacs] Add kat-mode

This commit is contained in:
Kat Huang 2023-08-14 04:04:48 +00:00
parent aee5f25ff4
commit 5f683cee8e
3 changed files with 64 additions and 1 deletions

View File

@ -10,6 +10,7 @@
.tutor .tutor
/eln-cache /eln-cache
/transient /transient
/tree-sitter
README.el README.el
README.html README.html
ac-comphist.dat ac-comphist.dat
@ -26,6 +27,7 @@ eproject.lst
eshell eshell
ido.last ido.last
jabber-avatar-cache jabber-avatar-cache
kat-mode.el
org-caldav-* org-caldav-*
org-caldav-backup.org org-caldav-backup.org
org-config.el org-config.el
@ -49,4 +51,3 @@ uber.el
url url
var var
xkcd xkcd
/tree-sitter

View File

@ -40,6 +40,7 @@
:config :config
(setq max-specpdl-size 99999999)) (setq max-specpdl-size 99999999))
(defvar imalison:kat-mode nil)
(setq custom-file "~/.emacs.d/custom-before.el") (setq custom-file "~/.emacs.d/custom-before.el")
(setq load-prefer-newer t) (setq load-prefer-newer t)
@ -62,6 +63,11 @@
(org-babel-load-file (org-babel-load-file
(concat (file-name-directory load-file-name) "README.org"))) (concat (file-name-directory load-file-name) "README.org")))
(when imalison:kat-mode
(let ((debug-on-error t))
(org-babel-load-file
(concat (file-name-directory load-file-name) "kat-mode.org"))))
(when imalison:do-benchmark (benchmark-init/deactivate)) (when imalison:do-benchmark (benchmark-init/deactivate))
;; Local Variables: ;; Local Variables:

View File

@ -0,0 +1,56 @@
* evil
#+begin_src emacs-lisp
(use-package evil
:demand t
:config
(progn
(evil-mode +1)))
(use-package evil-leader
:demand t
:config
(global-evil-leader-mode))
(use-package evil-org
:demand t
:after (org evil-leader)
:config
(progn
(add-hook 'org-mode-hook 'evil-org-mode)))
#+end_src
This makes evil-mode play nice with org-fc
#+begin_src emacs-lisp
(use-package org-fc
:demand t
:config
(progn
(evil-define-minor-mode-key '(normal insert emacs) 'org-fc-review-flip-mode
(kbd "RET") 'org-fc-review-flip
(kbd "n") 'org-fc-review-flip
(kbd "s") 'org-fc-review-suspend-card
(kbd "q") 'org-fc-review-quit)
(evil-define-minor-mode-key '(normal insert emacs) 'org-fc-review-rate-mode
(kbd "a") 'org-fc-review-rate-again
(kbd "h") 'org-fc-review-rate-hard
(kbd "g") 'org-fc-review-rate-good
(kbd "e") 'org-fc-review-rate-easy
(kbd "s") 'org-fc-review-suspend-card
(kbd "q") 'org-fc-review-quit)))
#+end_src
* Appearance
#+begin_src emacs-lisp
(setq imalison:dark-theme 'dracula)
#+end_src
* org-mode
#+begin_src emacs-lisp
(setq org-directory "~/org/") ; This is the directory where you want to save your Org files. Change as necessary.
(setq org-capture-templates nil)
(add-to-list 'org-capture-templates
'("j" "Journal" entry (file+datetree "~/org/daily-journal.org")
"* %?\nEntered on %U\n %i\n %a"))
#+end_src