Cacher is the code snippet organizer for pro developers

;;; General setting
(defun my-open-calfw ()
  (interactive)
  (cfw:open-calendar-buffer
   :contents-sources
   (list
    (cfw:org-create-source "LightBlue") ; Org-mode source
    (cfw:cal-create-source "orange") ; Diary source
    ;; (cfw:ical-create-source "Moon" "~/moon.ics" "Gray") ; iCalendar source1
    ;; (cfw:ical-create-source "gcal" "https://..../basic.ics" "IndianRed") ; Google Calendar ICS
    ;; (cfw:howm-create-source "blue") ; howm source
    )
   :annotation-sources
   (list
    (cfw:ical-create-source "Moon" "~/moon.ics" "Gray") ; Moon annotations
    )
   :view (or view 'month)
   ;; TODO :sorter (or sorter 'sorter)
   ))

;;; Global Keybinding
;; (global-set-key (kbd "C-x c") 'cfw:open-calendar-buffer)
(global-set-key (kbd "C-x c") '(my-open-calfw)) ; FIXME wrong type argument: commandp, (my-open-calfw).