From 64121d8e65eb71358e3eb68c4a4700f459c73814 Mon Sep 17 00:00:00 2001 From: Sacha Chua Date: Sat, 13 Nov 2021 01:25:14 -0500 Subject: Fix event --- emacsconf-update.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/emacsconf-update.el b/emacsconf-update.el index 55c29c7..7d0ef00 100644 --- a/emacsconf-update.el +++ b/emacsconf-update.el @@ -101,12 +101,12 @@ (defun emacsconf-update--update-entry (event zone-map) "Update the current Org heading to match EVENT. Use ZONE-MAP for timestamp decoding." - (let* ((dtstart-time (emacsconf-update--get-time-from-event e 'DTSTART zone-map)) - (dtend-time (emacsconf-update--get-time-from-event e 'DTEND zone-map))) + (let* ((dtstart-time (emacsconf-update--get-time-from-event event 'DTSTART zone-map)) + (dtend-time (emacsconf-update--get-time-from-event event 'DTEND zone-map))) (org-back-to-heading) (when (looking-at org-complex-heading-regexp) (replace-match (icalendar--convert-string-for-import - (icalendar--get-event-property e 'SUMMARY)) + (icalendar--get-event-property event 'SUMMARY)) t t nil 4)) (org-end-of-meta-data) (when (re-search-forward (concat "Tentative schedule: " org-ts-regexp "--" org-ts-regexp " *\n") -- cgit v1.2.3