From d33f34beada6ba579059dfb5c3b442d4af666c3d Mon Sep 17 00:00:00 2001 From: EmacsConf Date: Fri, 4 Nov 2022 16:57:11 -0700 Subject: Update talk status --- emacsconf.el | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'emacsconf.el') diff --git a/emacsconf.el b/emacsconf.el index 4b6b444..1a8e178 100644 --- a/emacsconf.el +++ b/emacsconf.el @@ -1152,5 +1152,11 @@ They will be called with TALK.") (org-agenda-category-filter-preset (list (concat "+" (plist-get track :id))))) (org-agenda-list nil emacsconf-date 2))) +(defun emacsconf-update-talk-status (slug from-states to-state) + (interactive (list (emacsconf-complete-talk) (read-string "From: ") (read-string "To: "))) + (emacsconf-with-talk-heading slug + (when (string-match from-states (org-entry-get (point) "TODO")) + (org-todo to-state)))) + (provide 'emacsconf) ;;; emacsconf.el ends here -- cgit v1.2.3