           ("N" "Notes" tags "NOTE"
            ((org-agenda-overriding-header "Notes")
             (org-tags-match-list-sublevels t)))
+          ("R" . "Review" )
+          ("Rw" "Week in review"
+           agenda ""
+           ;; agenda settings
+           ,(append
+             efs/org-agenda-review-settings
+             '((org-agenda-span 'week)
+               (org-agenda-start-on-weekday nil)
+               (org-agenda-overriding-header "Week in Review"))
+             )
+           ("~/org/review/week.html"))
+          ("Rd" "Day in review"
+           agenda ""
+           ;; agenda settings
+           ,(append
+             efs/org-agenda-review-settings
+             '((org-agenda-span 'day)
+               (org-agenda-overriding-header "Day in Review"))
+             )
+           ("~/org/review/day.html"))
+          ("Rm" "Month in review"
+           agenda ""
+           ;; agenda settings
+           ,(append
+             efs/org-agenda-review-settings
+             '((org-agenda-span 'month)
+               (org-agenda-start-day "01")
+               (org-read-date-prefer-future nil)
+               (org-agenda-overriding-header "Month in Review"))
+             )
+           ("~/org/review/month.html"))
           ("g" "GTD"
            ((agenda "" nil)
             (tags "INBOX"

            (string-match ":@home:" (org-get-tags-string))))
    (progn (outline-next-heading) (1- (point))))
   (t nil)))

(let ((active-project-match "-INBOX/PROJECT"))


            ;;             (org-match-list-sublevels t)))
            )))))

(add-hook 'org-agenda-mode-hook 'hl-line-mode)

