Emacs calendar

(goto-char (point-min)) (re-search-forward "#\\+NAME: event-summary") (org-ctrl-c-ctrl-c) (org-export-to-file 'html "README.html") ;; (unless my-laptop-p (my-schedule-announcements-for-upcoming-emacs-meetups)) ;; update the crontab (goto-char (org-find-property "CUSTOM_ID" "crontab")) (org-babel-execute-subtree) (when my-laptop-p (org-babel-goto-named-result "event-summary") (re-search-forward "^- ") (goto-char (match-beginning 0)) (let ((events (org-babel-read-result))) (oddmuse-edit "EmacsWiki" "Usergroups") (goto-char (point-min)) (delete-region (progn (re-search-forward "= Upcoming events =\n\n") (match-end 0)) (progn (re-search-forward "^$") (match-beginning 0))) (save-excursion (insert (mapconcat (lambda (s) (concat "* " s "\n")) events "")))))))) (my-prepare-calendar-for-export) #+end_src

(find-file "~/sync/emacs-news/index.org") nil nil

Saving Meetup cookies: Go to https://meetup.com , log in, Cookie jar export to copy:~/.cache/meetup-cookies.txt