From 3e70dc4a8024eb181f9d94b9199d4b1059982ca2 Mon Sep 17 00:00:00 2001 From: Amin Bandali Date: Thu, 8 Nov 2018 12:38:56 -0500 Subject: [PATCH] [emacs/{gnus,org}] org-store-link (binding + no limit on subject) --- init.org | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/init.org b/init.org index 8de259e..d8ea5c1 100644 --- a/init.org +++ b/init.org @@ -704,7 +704,9 @@ In short, my favourite way of life. (setq org-src-tab-acts-natively t org-src-preserve-indentation nil org-edit-src-content-indentation 0 + org-email-link-description-format "Email %c: %s" ; %.30s org-log-done 'time) + :bind (:map org-mode-map ("M-L" . org-insert-last-stored-link)) :hook ((org-mode . org-indent-mode) (org-mode . auto-fill-mode) (org-mode . flyspell-mode)) @@ -1816,8 +1818,9 @@ Hopefully temporary. (concat local lapsed)))) (bind-keys :map gnus-article-mode-map - ("r" . gnus-article-reply-with-original) - ("R" . gnus-article-wide-reply-with-original))) + ("r" . gnus-article-reply-with-original) + ("R" . gnus-article-wide-reply-with-original) + ("M-L" . org-store-link))) (use-package gnus-sum :bind (:map gnus-summary-mode-map @@ -1831,8 +1834,9 @@ Hopefully temporary. '(List-Id X-RT-Originator))) (bind-keys :map gnus-summary-mode-map - ("r" . gnus-summary-reply-with-original) - ("R" . gnus-summary-wide-reply-with-original))) + ("r" . gnus-summary-reply-with-original) + ("R" . gnus-summary-wide-reply-with-original) + ("M-L" . org-store-link))) (use-package nnmail :config -- 2.20.1