emacs-dot-d/nebkor-modules/nebkor-study.el
2025-04-30 15:59:01 -07:00

71 lines
2.2 KiB
EmacsLisp

;;; PDF Tools for reading and annotating PDF files
(use-package pdf-tools
:ensure (:host github :repo "vedang/pdf-tools" :branch "master")
:config
(pdf-tools-install))
;;; org-remark for annotating org and eww files
(use-package org-remark
:ensure t
:init
(setq org-remark-create-default-pen-set nil)
:bind
( :map global-map
("C-c r m" . org-remark-mark)
:map org-remark-mode-map
("C-c r e" . org-remark-mark-review)
("C-c r i" . org-remark-mark-important)
("C-c r o" . org-remark-open)
("C-c r n" . org-remark-view-next)
("C-c r p" . org-remark-view-prev)
("C-c r r" . org-remark-remove)
("C-c r d" . org-remark-delete)
("C-c r s" . org-remark-save)
("C-c r t" . org-remark-toggle)
("C-c r v" . org-remark-view))
:config
(defun vm/org-remark-notes ()
(expand-file-name "brain/marginalia.org" org-directory))
(setq org-remark-notes-file-name #'vm/org-remark-notes)
;; Create a pen set for specific kinds of highlights. NOTE: This
;; pen-set has been made for dark themes.
;; Creates `org-remark-mark-review'
(org-remark-create "review"
;; face: `dired-flagged'
'(:underline (:color "dark red" :style wave) :foreground "#f7143a")
'(CATEGORY "review" help-echo "Review this"))
;; Creates `org-remark-mark-important'
(org-remark-create "important"
;; face: `dired-broken-symlink'
'(:underline "gold" :background "red1" :foreground "yellow1" :weight bold)
'(CATEGORY "important"))
(set-face-bold 'org-remark-highlighter t)
(with-eval-after-load 'eww
(org-remark-eww-mode +1))
(with-eval-after-load 'info
(org-remark-info-mode +1))
(with-eval-after-load 'nov
(org-remark-nov-mode +1)))
;;; org-fc for flashcards and spaced repetition
(use-package org-fc
:ensure (:host github :repo "l3kn/org-fc" :branch "main")
:ensure-system-package (gawk)
:config
(setq org-fc-directories `(,(concat org-directory "/notes/"))))
;;; toc-org for automatic Table of Contents
(use-package toc-org
:ensure t)
;;; Downloading and archiving webpages
(use-package org-board
:ensure t
:bind-keymap
("C-c o" . org-board-keymap))
(provide 'nebkor-study)