Add org-present.

configs/init-org.el

@@ -149,11 +149,15 @@
 
 (use-package visual-fill-column
   :straight t
+  :defer t
+  :after (org)
   :config
   ;; Tamaño de la columna
   (setq-default visual-fill-column-width 150)
   ;; Centrar el texto
-  (setq-default visual-fill-column-center-text t)
+  (setq-default visual-fill-column-center-text t
+                visual-fill-column-adjust-for-text-scale nil
+                visual-fill-column-enable-sensible-window-split t)
   )
 
 ;; Segundo cerebro: Base de conocimientos en formato Zettelkasten
@@ -202,5 +206,34 @@
         org-fancy-priorities-list '("⚡" "⬆" "⬇" "☕"))
   )
 
+;; Org mode en modo presentación
+(use-package org-present
+  :straight t
+  :defer t
+  :after (org)
+  :config
+  (add-hook 'org-present-mode-hook
+            (lambda ()
+              (org-display-inline-images)
+              (org-present-hide-cursor)
+              (org-present-read-only)
+              ))
+  (add-hook 'org-present-mode-quit-hook
+            (lambda ()
+              ;; (org-remove-inline-images)
+              (org-present-show-cursor)
+              (org-present-read-write)))
+
+  (add-hook 'org-present-after-navigate-functions
+            (lambda ()
+              ;; Show only top-level headlines
+              (org-overview)
+              ;; Unfold the current entry
+              (org-show-entry)
+              ;; Show only direct subheadings of the slide but don't expand them
+              (org-show-children)
+              ))
+  )
+
 (provide 'init-org)
 ;;; init-org.el ends here