summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSacha Chua <sacha@sachachua.com>2021-11-13 01:25:14 -0500
committerSacha Chua <sacha@sachachua.com>2021-11-13 01:25:14 -0500
commit64121d8e65eb71358e3eb68c4a4700f459c73814 (patch)
tree0a8bf5e5cf0a5c01962056819ccf24143d1aaafe
parented5b0d0410085384651124b1438b6a70d29bbc92 (diff)
downloademacsconf-el-64121d8e65eb71358e3eb68c4a4700f459c73814.tar.xz
emacsconf-el-64121d8e65eb71358e3eb68c4a4700f459c73814.zip
Fix event
-rw-r--r--emacsconf-update.el6
1 files 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")