diff --git a/.gitignore b/.gitignore index 807aeb8..06b2445 100644 --- a/.gitignore +++ b/.gitignore @@ -77,3 +77,4 @@ projects /.lsp-eslint-choices /mastodon.plstore /lisp/ +/work/ diff --git a/config.org b/config.org index 97c632a..e2f8e52 100644 --- a/config.org +++ b/config.org @@ -1586,6 +1586,47 @@ After I wrote an [[https://mmk2410.org/2022/01/15/improving-my-new-blog-post-cre #+end_src +** org-tree-slide for presentations + +A presentation tool for org-mode based on the visibility of outline trees + +GitHub: [[https://github.com/takaxp/org-tree-slide][GitHub:takaxp/org-tree-slide]] + +#+begin_src emacs-lisp +(defun mmk2410/presentation-setup () + (org-display-inline-images) ;; Can also use org-startup-with-inline-images + (setq-local face-remapping-alist '((default (:height 1.5) variable-pitch) + (header-line (:height 4.0) variable-pitch) + (org-document-title (:height 1.75) org-document-title) + (org-code (:height 1.55) org-code) + (org-table (:height 1.55) org-table) + (org-verbatim (:height 1.55) org-verbatim) + (org-block (:height 1.25) org-block) + (org-block-begin-line (:height 0.7) org-block))) + (setq header-line-format " ") + (setq visual-fill-column-width 150) + (hl-line-mode 0)) + +(defun mmk2410/presentation-end () + (org-remove-inline-images) + (setq-local face-remapping-alist '((default variable-pitch default))) + (setq header-line-format nil) + (setq visual-fill-column-width 100) + (hl-line-mode 1)) + +(use-package org-tree-slide + :hook ((org-tree-slide-play . mmk2410/presentation-setup) + (org-tree-slide-stop . mmk2410/presentation-end)) + :custom + (org-tree-slide-slide-in-effect t) + (org-tree-slide-activate-message "Presentation started!") + (org-tree-slide-deactivate-message "Presentation finished!") + (org-tree-slide-header t) + (org-tree-slide-breadcrumbs " > ") + (org-image-actual-width nil)) +#+end_src + + * Org Research Assistant ** Org Roam @@ -2108,7 +2149,11 @@ Resources: #+begin_src emacs-lisp (use-package eshell - :bind (("C-c s" . 'eshell))) + :bind (("C-c s" . 'eshell)) + :config + (setq eshell-visual-subcommands + '(("docker" "pull" "build") + ("docker-compose" "build")))) #+end_src * Elfeed @@ -2404,6 +2449,9 @@ I don't really like the default bookmarks that mu4e sets. Thats why I overwrite '(( :name "Unread work messages" :key ?w :query "(flag:unread and m:/work/*) or m:/work/inbox" ) + ( :name "Unread no-reply work messages" + :key ?n + :query "flag:unread and m:/work-noreply/*" ) ( :name "Unread private messages" :key ?p :query "(flag:unread and m:/mailbox/*) or m:/mailbox/inbox" )))