kj/confi-emacs-actual
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Compare commits

base: kj:3b73728c416608a467f9e57ea0c4da5d68d78c6a
Branches Tags
kj:master
kj:evil
...
compare: kj:6c3949e3aaf0a5b54f6f780cab90eabee317bc20
Branches Tags
kj:master
kj:evil

2 Commits
3b73728c41 ... 6c3949e3aa

Author SHA1 Message Date
kj
6c3949e3aa Add org-present. 2023-04-13 18:31:51 -04:00
kj
599fe4bb8e Disable unused shortcuts. 2023-04-13 18:30:48 -04:00
2 changed files with 38 additions and 5 deletions
Show Stats Expand all files Collapse all files

8
configs/init-ivy.el
View File

@ -16,10 +16,10 @@
:bind (("C-s" . swiper-isearch) :bind (("C-s" . swiper-isearch)
("C-r" . counsel-rg) ("C-r" . counsel-rg)
("C-c C-r" . ivy-resume) ;; ("C-c C-r" . ivy-resume)
("C-c v p" . ivy-push-view) ;; ("C-c v p" . ivy-push-view)
("C-c v o" . ivy-pop-view) ;; ("C-c v o" . ivy-pop-view)
("C-c v ." . ivy-switch-view) ;; ("C-c v ." . ivy-switch-view)
:map counsel-mode-map :map counsel-mode-map
([remap swiper] . counsel-grep-or-swiper) ([remap swiper] . counsel-grep-or-swiper)

35
configs/init-org.el
View File

@ -149,11 +149,15 @@
(use-package visual-fill-column (use-package visual-fill-column
:straight t :straight t
:defer t
:after (org)
:config :config
;; Tamaño de la columna ;; Tamaño de la columna
(setq-default visual-fill-column-width 150) (setq-default visual-fill-column-width 150)
;; Centrar el texto ;; 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 ;; Segundo cerebro: Base de conocimientos en formato Zettelkasten
@ -202,5 +206,34 @@
org-fancy-priorities-list '("⚡" "⬆" "⬇" "☕")) 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) (provide 'init-org)
;;; init-org.el ends here ;;; init-org.el ends here