From 0765008e7471fb2a561674aee62481ba80e1a01c Mon Sep 17 00:00:00 2001 From: Sacha Chua Date: Mon, 14 Nov 2022 20:42:57 -0500 Subject: mail merge improvements --- emacsconf.el | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) (limited to 'emacsconf.el') diff --git a/emacsconf.el b/emacsconf.el index 36d21b2..855e2f8 100644 --- a/emacsconf.el +++ b/emacsconf.el @@ -1250,9 +1250,26 @@ tracks with the ID in the cdr of that list." (if do-insert (insert result)) result)) +(defun emacsconf-add-to-logbook (note) + "Add NOTE as a logbook entry for the current subtree." + (move-marker org-log-note-return-to (point)) + (move-marker org-log-note-marker (point)) + (with-temp-buffer + (insert note) + (let ((org-log-note-purpose 'note)) + (org-store-log-note)))) + +(defun emacsconf-add-to-talk-logbook (talk note) + "Add NOTE as a logbook entry for TALK." + (interactive (list (emacsconf-complete-talk) (read-string "Note: "))) + (save-excursion + (emacsconf-with-talk-heading talk + (emacsconf-add-to-logbook note)))) + (defun emacsconf-reload () "Reload the emacsconf-el modules." (interactive) (mapc #'load-library '("emacsconf" "emacsconf-erc" "emacsconf-publish" "emacsconf-stream" "emacsconf-pad"))) + (provide 'emacsconf) ;;; emacsconf.el ends here -- cgit v1.2.3