Fix org-latex-export-to-pdf spamming kill ring with tex

This commit is contained in:
Adam Goldsmith 2018-03-15 00:32:55 -04:00
parent 2e5cc398b4
commit b8f75be5fe

View File

@ -161,7 +161,7 @@
(use-package org (use-package org
:defer :defer
:bind ((:map org-mode-map ("C-z" . org-latex-export-to-pdf)) :bind ((:map org-mode-map ("C-z" . org-latex-export-to-pdf-no-kr))
(:map org-src-mode-map ("C-z" . org-src-export-to-pdf))) (:map org-src-mode-map ("C-z" . org-src-export-to-pdf)))
:config :config
;; Make windmove work in org-mode: ;; Make windmove work in org-mode:
@ -178,9 +178,13 @@
(defun org-latex-open-pdf () (defun org-latex-open-pdf ()
(interactive) (interactive)
(call-process "evince" nil 0 nil (org-latex-export-to-pdf))) (call-process "evince" nil 0 nil (org-latex-export-to-pdf)))
(defun org-latex-export-to-pdf-no-kr ()
(interactive)
(org-latex-export-to-pdf)
(pop kill-ring)) ; remove most recent element of kill ring
(defun org-src-export-to-pdf () (defun org-src-export-to-pdf ()
(interactive) (interactive)
(org-src-in-org-buffer (org-latex-export-to-pdf))) (org-src-in-org-buffer (org-latex-export-to-pdf-no-kr)))
(setq org-confirm-babel-evaluate nil) (setq org-confirm-babel-evaluate nil)
(org-babel-do-load-languages (org-babel-do-load-languages
'org-babel-load-languages 'org-babel-load-languages