Add org-noter "i" binding that was not working

This commit is contained in:
Thomas Dehaeze 2020-03-19 10:08:53 +01:00
parent ab94118c7f
commit 7e4661d460

View File

@ -1473,19 +1473,35 @@ Ressources:
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package! org-noter (use-package! org-noter
:after org :defer t
:init :after (:any org pdf-view)
:config :config
(setq org-noter-always-create-frame nil) (setq org-noter-always-create-frame nil)
(setq org-noter-kill-frame-at-session-end nil) (setq org-noter-kill-frame-at-session-end nil)
;; Fraction of the frame that the document window will occupy when split ;; Fraction of the frame that the document window will occupy when split
(setq org-noter-doc-split-fraction '(0.6 . 0.6)) (setq org-noter-doc-split-fraction '(0.6 . 0.6))
;; Save the last visited location automatically; when starting a new session, go to that location ;; Save the last visited location automatically; when starting a new session, go to that location
(setq org-noter-auto-save-last-location t) (setq org-noter-auto-save-last-location nil)
;; Add an empty line between each note's heading and content ;; Add an empty line between each note's heading and content
(setq org-noter-separate-notes-from-heading t) (setq org-noter-separate-notes-from-heading t)
;; List of paths to check (non recursively) when searching for a notes file ;; List of paths to check (non recursively) when searching for a notes file
(setq org-noter-notes-search-path "~/Cloud/thesis/ressources/notes") (setq org-noter-notes-search-path "~/Cloud/thesis/ressources/notes")
(defun org-noter-init-pdf-view ()
(pdf-view-fit-page-to-window)
(pdf-view-auto-slice-minor-mode)
(run-at-time "0.5 sec" nil #'org-noter))
(add-hook 'pdf-view-mode-hook 'org-noter-init-pdf-view)
(map!
:map pdf-view-mode-map
(:desc "Insert Note"
:n "i" #'org-noter-insert-note))
) )
#+end_src #+end_src