diff options
| author | Sacha Chua <sacha@sachachua.com> | 2022-11-23 09:40:46 -0500 |
|---|---|---|
| committer | Sacha Chua <sacha@sachachua.com> | 2022-11-23 09:41:14 -0500 |
| commit | 93c3abfecc9faed2dcf02f90a74c1dade15d8652 (patch) | |
| tree | 6a154af7d3e0a9507c746485abbbc045c061b991 | |
| parent | f936f523417588bd72a72f12161b32ad5c070442 (diff) | |
| download | emacsconf-el-93c3abfecc9faed2dcf02f90a74c1dade15d8652.tar.xz emacsconf-el-93c3abfecc9faed2dcf02f90a74c1dade15d8652.zip | |
omit cancelled events from ical
| -rw-r--r-- | emacsconf-ical.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/emacsconf-ical.el b/emacsconf-ical.el index a1e02b2..142c466 100644 --- a/emacsconf-ical.el +++ b/emacsconf-ical.el @@ -114,7 +114,7 @@ (with-temp-file (expand-file-name "emacsconf.ics" (or emacsconf-ical-public-directory (expand-file-name emacsconf-year emacsconf-directory))) - (insert (emacsconf-format-as-ical (or info (emacsconf-get-talk-info)))))) + (insert (emacsconf-format-as-ical (emacsconf-prepare-for-display (or info (emacsconf-get-talk-info))))))) (defun emacsconf-ical-generate-tracks (&optional info) (interactive) @@ -125,6 +125,6 @@ (or emacsconf-ical-public-directory (expand-file-name emacsconf-year emacsconf-directory))) (insert (emacsconf-format-as-ical (cdr entry))))))) - (seq-group-by (lambda (o) (plist-get o :track)) (or info (emacsconf-get-talk-info))))) + (seq-group-by (lambda (o) (plist-get o :track)) (emacsconf-prepare-for-display (or info (emacsconf-get-talk-info)))))) (provide 'emacsconf-ical) |