Set up org-habit

init.el

@@ -334,8 +334,12 @@
 
 (setq calendar-week-start-day 1)
 (setq org-agenda-start-on-weekday nil)
+(when (islin)
   (setq org-agenda-files (list "~/Documents/drive/org/calendar"
-			      "~/Documents/drive/org/period.org"))
+			       "~/Documents/drive/org/period.org"
+			       "~/Documents/drive/org/habit.org")))
+(when (iswin)
+  (setq org-agenda-files '("~/Documents/drive/org/calendar")))
 (setq org-agenda-prefix-format
       '((todo . "%-2c %b")
 	(tags . "%-2c %b")
@@ -343,6 +347,12 @@
 (setq org-use-property-inheritance (quote ("LOCATION")))
 (setq org-agenda-todo-ignore-scheduled t)
 (setq org-agenda-todo-ignore-deadlines t)
+(setq org-agenda-format-date (lambda (date) (concat "\n"
+                                                    (make-string (window-width) 9472)
+                                                    "\n"
+                                                    (org-agenda-format-date-aligned date))))
+(add-to-list 'org-modules 'org-habit t)
+(setq org-habit-show-all-today t)
 
 (setq org-export-headline-levels 6)