Some calendar and org-mode integration stuff

The following code binds RET in calendar mode to a function that opens an org agenda buffer for that day (or better that week). (defun th-calendar-open-agenda () (interactive) (let* ((calendar-date (or ;; the date at point in the calendar buffer (calendar-cursor-to-date) ;; if there’s none, use the curren date (calendar-current-date))) (day (time-to-days (encode-time 1 1 [...]