From b8f75be5fe79d287b769a8fedc5c1c344e487833 Mon Sep 17 00:00:00 2001 From: Adam Goldsmith Date: Thu, 15 Mar 2018 00:32:55 -0400 Subject: [PATCH] Fix org-latex-export-to-pdf spamming kill ring with tex --- .emacs.d/init.el | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/.emacs.d/init.el b/.emacs.d/init.el index efe21ab..4e0c1df 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -161,7 +161,7 @@ (use-package org :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))) :config ;; Make windmove work in org-mode: @@ -178,9 +178,13 @@ (defun org-latex-open-pdf () (interactive) (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 () (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) (org-babel-do-load-languages 'org-babel-load-languages