Bug: org-habit treats all repeat tasks as ".+" type [7.9.3f (release_7.9.3f-17-g7524ef @ /usr/share/emacs/24.3/lisp/org/)]

[何利勇 <leodream2008@gmail.com>]

[-- Attachment #1: Type: text/plain, Size: 4726 bytes --]

It looks like org-habit only handle the ".+" repeater correctly, though
the document says it supports ".+", "++" and "+".

For example, when create agenda for the following org content.

* TODO Test_+
SCHEDULED: <2015-03-02 Mon +1w>
- State "DONE"       from "TODO"  [2015-02-23 Mon 10:56]
- State "DONE"       from "TODO"  [2015-02-16 Mon 10:56]
- State "DONE"       from "TODO"  [2015-02-10 Tue 10:56]
- State "DONE"       from "READY" [2015-02-02 Mon 10:56]
:PROPERTIES:
:STYLE:    habit
:LAST_REPEAT: [2015-02-23 Mon 10:56]
:ID:       e960c39e-4f92-4ef0-a5ee-a4d3fcfd26bf
:END:

* TODO Test_++
SCHEDULED: <2015-03-02 Mon ++1w>
- State "DONE"       from "TODO"  [2015-02-23 Mon 10:56]
- State "DONE"       from "TODO"  [2015-02-15 Sun 10:56]
- State "DONE"       from "READY" [2015-02-02 Mon 10:56]
:PROPERTIES:
:STYLE:    habit
:LAST_REPEAT: [2015-02-23 Mon 10:56]
:END:

The Test_+ was marked as DONE one day after 02-09 (did not finish on time)
and Test_++ missed the 02-09 schedule. But the subsequent schedules are
DONE on time.

So, I expect there should be one red for each bar.

But in fact, it mark the DONE on 02-16 of Test_+ as blue and the DONE
on 02-23 of Test_++ as red, which should only happen when using ".+" --
the subsequent schedule will be shifted n day/week/month after the last
repeat.

http://imgur.com/Cvh0Xxb

------------------------------------------------------------------------



Emacs  : GNU Emacs 24.3.1 (x86_64-pc-linux-gnu, GTK+ Version 3.10.7)
 of 2014-03-08 on lamiak, modified by Debian
Package: Org-mode version 7.9.3f (release_7.9.3f-17-g7524ef @
/usr/share/emacs/24.3/lisp/org/)

current state:
==============
(setq
 org-export-preprocess-before-selecting-backend-code-hook
'(org-beamer-select-beamer-code)
 org-tab-first-hook '(org-hide-block-toggle-maybe
              org-src-native-tab-command-maybe
              org-babel-hide-result-toggle-maybe
              org-babel-header-arg-expand)
 org-habit-preceding-days 30
 org-speed-command-hook '(org-speed-command-default-hook
              org-babel-speed-command-hook)
 org-edit-timestamp-down-means-later t
 org-occur-hook '(org-first-headline-recenter)
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-agenda-start-on-weekday nil
 org-export-preprocess-before-normalizing-links-hook
'(org-remove-file-link-modifiers)
 org-log-done t
 org-confirm-shell-link-function 'yes-or-no-p
 org-export-latex-final-hook '(org-beamer-amend-header org-beamer-fix-toc
                   org-beamer-auto-fragile-frames
                   org-beamer-place-default-actions-for-lists)
 org-export-latex-after-initial-vars-hook '(org-beamer-after-initial-vars)
 org-habit-following-days 3
 org-agenda-include-diary t
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-src-mode-hook '(org-src-babel-configure-edit-buffer
             org-src-mode-configure-edit-buffer)
 org-tags-column 80
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-babel-pre-tangle-hook '(save-buffer)
 org-mode-hook '(#[nil "\300\301\302\303\304$\207"
           [org-add-hook change-major-mode-hook org-show-block-all
            append local]
           5]
         #[nil "\300\301\302\303\304$\207"
           [org-add-hook change-major-mode-hook
            org-babel-show-result-all append local]
           5]
         org-babel-result-hide-spec org-babel-hide-all-hashes)
 org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point
              org-babel-execute-safely-maybe)
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
          org-cycle-show-empty-lines
          org-optimize-window-after-visibility-change)
 org-habit-show-habits-only-for-today nil
 org-export-latex-format-toc-function 'org-export-latex-format-toc-default
 org-export-blocks '((src org-babel-exp-src-block nil)
             (export-comment org-export-blocks-format-comment t)
             (ditaa org-export-blocks-format-ditaa nil)
             (dot org-export-blocks-format-dot nil))
 org-agenda-tags-column -30
 org-export-first-hook '(org-beamer-initialize-open-trackers)
 org-export-interblocks '((src org-babel-exp-non-block-elements))
 org-modules '("org-habit" org-bbdb org-bibtex org-docview org-gnus org-info
           org-jsinfo org-irc org-mew org-mhe org-rmail org-vm org-w3m
           org-wl)
 org-fast-tag-selection-single-key 'expert
 org-agenda-window-setup 'current-window
 org-agenda-span 14
 org-confirm-elisp-link-function 'yes-or-no-p
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-completion-use-ido t
 org-export-kill-product-buffer-when-displayed t
 org-habit-graph-column 30
 org-agenda-files '("~/Dropbox/notes/TODOList.org")
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 )

[-- Attachment #2: Type: text/html, Size: 5803 bytes --]