emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[O] Bug: Org Habits does not recalculate the "Scheduled:" line [8.3.2 (r


From: Samuel W. Flint
Subject: [O] Bug: Org Habits does not recalculate the "Scheduled:" line [8.3.2 (release_8.3.2-441-ga87dea @ /home/swflint/.emacs.d/org-mode/lisp/)]
Date: Sat, 02 Jan 2016 00:40:55 -0500

Remember to cover the basics, that is, what you expected to happen and
what in fact did happen.  You don't know how to make a good report?  See

     http://orgmode.org/manual/Feedback.html#Feedback

Your bug report will be posted to the Org-mode mailing list.
------------------------------------------------------------------------

I use Org's habit feature.  I expect that when I mark a task such as the
following as done:

* TODO Weekly Review
SCHEDULED: <2016-01-01 Fri .+1w/2w>
:PROPERTIES:
:STYLE:    habit
:END:

The SCHEDULED line should change, to reflect the new date.  As of right
now, it doesn't, and instead, the SCHEDULED line is removed, rendering
the "habit" useless.



Emacs  : GNU Emacs 24.5.1 (x86_64-redhat-linux-gnu, GTK+ Version 3.17.8)
 of 2015-09-11 on buildvm-21.phx2.fedoraproject.org
Package: Org-mode version 8.3.2 (release_8.3.2-441-ga87dea @ 
/home/swflint/.emacs.d/org-mode/lisp/)

current state:
==============
(setq
 org-capture-prepare-finalize-hook '(gnorb-registry-capture-abort-cleanup
                                     gnorb-gnus-capture-abort-cleanup 
org-id-get-create)
 org-tree-slide-mode-hook '((lambda nil (text-scale-increase 2)))
 org-hide-leading-stars t
 org-footnote-auto-adjust 'sort
 org-drill-optimal-factor-matrix '((1 (2.36 . 3.86) (2.5 . 4.0) 
(2.1799999999999997 . 3.72))
                                   (2 (2.2199999999999998 . 2.328) (2.36 . 
2.412)))
 org-tab-first-hook '(org-hide-block-toggle-maybe 
org-babel-hide-result-toggle-maybe
                      org-babel-header-arg-expand)
 org-habit-show-all-today t
 org-latex-classes '(("beamer" "\\documentclass[presentation]{beamer}"
                      ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     ("article" "\\documentclass[11pt]{article}"
                      ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}")
                      ("\\paragraph{%s}" . "\\paragraph*{%s}")
                      ("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
                     ("report" "\\documentclass[11pt]{report}"
                      ("\\part{%s}" . "\\part*{%s}") ("\\chapter{%s}" . 
"\\chapter*{%s}")
                      ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     ("book" "\\documentclass[11pt]{book}" ("\\part{%s}" . 
"\\part*{%s}")
                      ("\\chapter{%s}" . "\\chapter*{%s}")
                      ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     )
 org-insert-heading-hook '(org-expiry-insert-created)
 org-speed-command-hook '(org-speed-command-default-hook 
org-babel-speed-command-hook)
 org-agenda-skip-timestamp-if-done t
 org-download-method 'attach
 org-ellipsis "⤵"
 org-occur-hook '(org-first-headline-recenter)
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-agenda-start-on-weekday nil
 org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-capture-after-finalize-hook '((lambda nil (org-agenda-to-appt t)))
 org-src-window-setup 'current-window
 org-latex-format-inlinetask-function 
'org-latex-format-inlinetask-default-function
 org-babel-tangle-comment-format-beg "%source-name, %file"
 org-confirm-shell-link-function 'yes-or-no-p
 org-id-link-to-org-use-id t
 org-finalize-agenda-hook '((lambda nil (hl-line-mode)))
 org-after-tags-change-hook '(org-expiry-insert-created)
 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
 org-clock-idle-time 15
 org-startup-folded nil
 org-latex-pdf-process '("pdflatex -shell-escape -interaction nonstopmode 
-output-directory %o %f" "bibtex %b" "pdflatex -shell-escape -interaction 
nonstopmode -output-directory %o %f" "pdflatex -shell-escape -interaction 
nonstopmode -output-directory %o %f")
 org-panes-split-overview-horizontally t
 org-special-ctrl-a/e t
 org-agenda-custom-commands '(("n" "Agenda + TODOs" ((agenda "" nil) (alltodo 
"" nil)) nil)
                              ("s" "School Schedule" agenda ""
                               ((org-agenda-tag-filter-preset (quote 
("+school")))))
                              ("A" "List Assignments" agenda ""
                               ((org-agenda-tag-filter-preset
                                 (quote ("+school" "+assignment")))
                                )
                               (org-agenda-deadline-warning-days 10))
                              )
 org-use-sub-superscripts '{}
 org-latex-format-headline-function 'org-latex-format-headline-default-function
 org-expiry-handler-function 'org-toggle-archive-tag
 org-tree-slide-stop-hook '((lambda nil (text-scale-decrease 2)))
 org-default-notes-file "~/org/notes.org"
 org-capture-templates '(("a" "Create Appointment" entry
                          (file+olp "~/org/agenda.org" "Main Agenda, including 
diary"
                           "Current")
                          (file 
"~/.emacs.d/org-capture-templates/appointment-template.org")
                          :empty-lines 1 :prepend nil)
                         ("t" "TODO Items")
                         ("tt" "Standard TODO" entry
                          (file+headline "~/org/main.org" "To Do")
                          (file 
"~/.emacs.d/org-capture-templates/todo-template.org")
                          :empty-lines 1)
                         ("td" "Deadline TODO" entry
                          (file+headline "~/org/main.org" "To Do")
                          (file
                           
"~/.emacs.d/org-capture-templates/todo-deadline-template.org")
                          :empty-lines 1)
                         ("tl" "Linked TODO" entry (file+headline 
"~/org/main.org" "To Do")
                          (file 
"~/.emacs.d/org-capture-templates/todo-template.org")
                          :empty-lines 1)
                         ("j" "Journal Entry" entry (file+datetree 
"~/org/journal.org.gpg")
                          (file 
"~/.emacs.d/org-capture-templates/journal-template.org")
                          :empty-lines 1)
                         ("n" "Notes")
                         ("nn" "General Notes" entry (file+datetree 
"~/org/notes.org")
                          (file
                           
"~/.emacs.d/org-capture-templates/notes-journal-template.org")
                          :empty-lines 1)
                         ("nl" "Linked Note" entry (file+datetree 
"~/org/notes.org")
                          (file
                           
"~/.emacs.d/org-capture-templates/linked-note-journal-template.org")
                          :empty-lines 1)
                         ("nq" "Quoting Note" entry (file+datetree 
"~/org/notes.org")
                          (file
                           
"~/.emacs.d/org-capture-templates/quoting-note-journal-template.org")
                          :empty-lines 1)
                         ("nt" "Linked/Quoted Notes" entry (file+datetree 
"~/org/notes.org")
                          (file
                           
"~/.emacs.d/org-capture-templates/technical-journal-template.org")
                          :empty-lines 1)
                         ("nd" "Note on Date" entry (file+datetree+prompt 
"~/org/notes.org")
                          (file
                           
"~/.emacs.d/org-capture-templates/notes-journal-template.org")
                          :empty-lines 1)
                         ("s" "Code Snip" entry (file "~/org/snips.org")
                          (file 
"~/.emacs.d/org-capture-templates/snippet-template.org")
                          :empty-lines 1)
                         ("l" "Add an Entry to the Library" entry
                          (file+olp "library.org" "Books")
                          (file 
"~/.emacs.d/org-capture-templates/book-template.org")
                          :empty-lines 1)
                         ("A" "Assignment" entry (file "~/org/school.org")
                          (file 
"~/.emacs.d/org-capture-templates/assignment-template.org")
                          :empty-lines 1)
                         ("c" "calfw2org" entry
                          (file+olp "~/org/agenda.org" "Main Agenda, including 
diary"
                           "Current")
                          (file 
"~/.emacs.d/org-capture-templates/clfw-template.org")
                          :empty-lines 1)
                         ("b" "Bookmark" item
                          (file+olp "~/org/bookmarks.org" "Unsorted Bookmarks") 
"%a"
                          :immediate-finish t)
                         )
 org-latex-image-default-width ""
 org-after-todo-state-change-hook '(org-expiry-insert-created 
org-clock-out-if-current)
 org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn ## CONTENTS)"]
 org-capture-mode-hook '(gnorb-registry-capture gnorb-gnus-capture-attach
                         gnorb-org-capture-collect-link)
 org-disputed-keys '(([(shift up)] . [(meta p)]) ([(shift down)] . [(meta n)])
                     ([(shift left)] . [(meta -)]) ([(shift right)] . [(meta 
+)])
                     ([(control shift right)] . [(meta shift +)])
                     ([(control shift left)] . [(meta shift -)])
                     ([(control tab)] . [(meta control tab)]))
 org-src-mode-hook '(org-src-babel-configure-edit-buffer 
org-src-mode-configure-edit-buffer)
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-babel-pre-tangle-hook '(save-buffer)
 org-font-lock-set-keywords-hook '(org-drill-add-cloze-fontification)
 org-mode-hook '(ws-butler-mode wc-mode er/add-org-mode-expansions abbrev-mode
                 org-bullets-mode (lambda nil (org-indent-mode 1)) 
visual-line-mode
                 flyspell-mode org-clock-load
                 #[nil
                   "\305\306    
>\203\307\n\310\311#\210\307\312\313#\210\307\314\315#\210\306        
>\203,\307\n\316\317#\210\307\n\320\321#\210\322        
>\203>\307\323\324#\210\307\325\324#\210\326  
>\203P\307\n\327\317#\210\307\n\330\321#\210\331        
>\203_\332\311\f\333BC\334#\210\335     >\203k\332\311\336\334#\210\337 
>\203w\332\311\340\334#\210\341\342\343\344\311$\210\345\342\311\"\210\342\207"
                   [org-mouse-context-menu-function

                    org-mouse-features

                    org-mouse-map

                    org-mode-map

                    org-outline-regexp

                    org-mouse-context-menu

                    context-menu

                    org-defkey

                    [mouse-3]

                    nil

                    [mouse-3]

                    org-mouse-show-context-menu

                    [down-mouse-1]

                    org-mouse-down-mouse

                    [C-drag-mouse-1]

                    org-mouse-move-tree

                    [C-down-mouse-1]

                    org-mouse-move-tree-start

                    yank-link

                    [S-mouse-2]

                    org-mouse-yank-link

                    [drag-mouse-3]

                    move-tree

                    [drag-mouse-3]

                    [down-mouse-3]

                    activate-stars

                    font-lock-add-keywords

                    (0



                     (\`







                      (face















                       org-link















                       mouse-face















                       highlight















                       keymap















                       (\, org-mouse-map)















                       )







                      )



                     (quote prepend)



                     )

                    t

                    activate-bullets

                    (("^[       ]*\\([-+*]\\|[0-9]+[.)]\\) +"



                      (1







                       (\`















                        (face































                         org-link































                         keymap































                         (\, org-mouse-map)































                         mouse-face highlight)















                        )







                       (quote prepend)







                       )




                      )



                     )

                    activate-checkboxes

                    (("^[       ]*\\([-+*]\\|[0-9]+[.)]\\) +\\(\\[[ X]\\]\\)"


                      (2





                       (\`











                        (face























                         bold























                         keymap























                         (\, org-mouse-map)























                         mouse-face highlight)











                        )





                       t)



                      )


                     )

                    ad-add-advice

                    org-open-at-point

                    (org-mouse-open-at-point



                     nil



                     t



                     (advice













                      lambda













                      nil













                      (let





















































                       ((context
















































































































                         (org-context)




















































































































                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                        )


































































































                        )





















































                       (cond





















































                        ((assq :headline-stars context)











































































































                         (org-cycle)











































































































                         )





















































                        ((assq :checkbox context)





















































                         (org-toggle-checkbox)





















































                         )





















































                        ((assq :item-bullet context)





















































                         (let





















































                          ((org-cycle-include-plain-lists t)











































































































                           )





















































                          (org-cycle)





















































                          )





















































                         )





















































                        ((org-footnote-at-reference-p)





















































                         nil)





















































                        (t ad-do-it)





















































                        )





















































                       )













                      )



                     )

                    around ad-activate]
                   5]
                 #[nil "\300\301\302\303\304$\207"
                   [org-add-hook before-save-hook org-encrypt-entries nil t] 5]
                 #[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-panes-main-size 80
 org-refile-targets '(("/home/swflint/org/main.org" :maxlevel . 7)
                      ("/home/swflint/org/carnegie-books.org" :maxlevel . 7)
                      ("/home/swflint/org/recipes.org" :maxlevel . 7)
                      ("/home/swflint/org/notes.org" :maxlevel . 7)
                      ("/home/swflint/org/college.org" :maxlevel . 7)
                      ("/home/swflint/org/travel-list.org" :maxlevel . 7)
                      ("/home/swflint/org/bookmarks.org" :maxlevel . 7)
                      ("/home/swflint/org/quotes.org" :maxlevel . 7)
                      ("/home/swflint/org/snips.org" :maxlevel . 7)
                      ("/home/swflint/org/agenda.org" :maxlevel . 7)
                      ("/home/swflint/org/sicp.org" :maxlevel . 7)
                      ("/home/swflint/org/school.org" :maxlevel . 7)
                      ("/home/swflint/org/library.org" :maxlevel . 7)
                      ("/home/swflint/org/main.org_archive" :maxlevel . 7))
 org-download-timestamp "_%Y-%m-%d_%H-%M-%S"
 org-export-with-tags nil
 org-archive-hook '(org-attach-archive-delete-maybe)
 org-use-speed-commands t
 org-ascii-format-drawer-function #[771 "\207" [] 4 "\n\n(fn NAME CONTENTS 
WIDTH)"]
 org-replace-disputed-keys t
 org-clock-persist 'history
 org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point 
org-babel-execute-safely-maybe)
 org-refile-use-outline-path 'file
 org-directory "~/org/"
 org-enforce-todo-dependencies t
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
                  org-cycle-show-empty-lines 
org-optimize-window-after-visibility-change)
 org-tags-exclude-from-inheritance '("crypt")
 org-M-RET-may-split-line '((headline) (item . t) (table))
 org-log-refile 'note
 org-plantuml-jar-path "~/bin/plantuml.jar"
 org-edit-src-auto-save-idle-delay 5
 org-read-date-prefer-future 'time
 org-agenda-finalize-hook '((lambda nil (hl-line-mode)))
 org-export-before-processing-hook '(esf/remove-lines-with-ignore-heading-tag)
 org-lowest-priority 69
 org-crypt-key "266596F4"
 org-enforce-todo-checkbox-dependencies t
 org-refile-allow-creating-parent-nodes t
 org-use-property-inheritance t
 org-blank-before-new-entry '((heading . t) (plain-list-item . auto))
 org-html-infojs-options '((path . "http://flintfam.org/org-info.js";) (view . 
"info")
                           (toc . :with-toc) (ftoc . "0") (tdepth . "max") 
(sdepth . "max")
                           (mouse . "underline") (buttons . "0") (ltoc . "1")
                           (up . :html-link-up) (home . :html-link-home))
 org-todo-keywords '((sequence "TODO(t)" "WORKING(w)" "|" "DONE(d)")
                     (sequence "REPORT(r)" "BUG(b)" "KNOWNCAUSE(k)" "|" 
"FIXED(f)")
                     (sequence "|" "CANCELLED(c)"))
 org-modules '(org-bbdb org-bibtex org-crypt org-docview org-gnus org-habit 
org-id org-info
               org-irc org-mouse org-w3m org-annotate-file org-bookmark 
org-drill org-eshell
               org-invoice org-secretary org-expiry org-panel jsinfo 
org-license)
 org-link-abbrev-alist '(("ddg" . "https://duckduckgo.com/?q=%s";))
 org-agenda-span 'day
 org-latex-packages-alist '(("" "lmodern" nil) ("" "natbib" nil)
                            ("nottoc,numbib" "tocbibind" nil) ("" "csquotes" 
nil)
                            ("" "color" nil) ("" "listings" nil) ("" "color" 
nil)
                            ("UTF8" "inputenc" nil))
 org-babel-tangle-lang-exts '(("python" . "py") ("perl" . "pl") ("ocaml" . "ml")
                              ("maxima" . "max") ("lisp" . "lisp") ("LilyPond" 
. "ly")
                              ("latex" . "tex") ("haskell" . "hs") ("D" . "d")
                              ("C++" . "cpp") ("emacs-lisp" . "el") ("elisp" . 
"el"))
 org-confirm-elisp-link-function 'yes-or-no-p
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-mouse-features '(context-menu move-tree yank-link activate-stars 
activate-bullets
                      activate-checkboxes)
 org-latex-listings t
 org-default-priority 67
 org-blocker-hook '(org-block-todo-from-checkboxes
                    org-block-todo-from-children-or-siblings-or-parent)
 org-agenda-skip-deadline-if-done t
 org-html-format-headline-function 'org-html-format-headline-default-function
 org-structure-template-alist '(("n" "#+Name: ?" "#+Name: ?")
                                ("C" "#+Caption: ?" "#+Caption: ?")
                                ("s" "#+BEGIN_SRC ?\n\n#+END_SRC")
                                ("e" "#+BEGIN_EXAMPLE\n?\n#+END_EXAMPLE")
                                ("q" "#+BEGIN_QUOTE\n?\n#+END_QUOTE")
                                ("v" "#+BEGIN_VERSE\n?\n#+END_VERSE")
                                ("V" "#+BEGIN_VERBATIM\n?\n#+END_VERBATIM")
                                ("c" "#+BEGIN_CENTER\n?\n#+END_CENTER")
                                ("l" "#+BEGIN_EXPORT latex\n?\n#+END_EXPORT")
                                ("L" "#+LaTeX: ")
                                ("h" "#+BEGIN_EXPORT html\n?\n#+END_EXPORT")
                                ("H" "#+HTML: ")
                                ("a" "#+BEGIN_EXPORT ascii\n?\n#+END_EXPORT")
                                ("A" "#+ASCII: ") ("i" "#+INDEX: ?")
                                ("I" "#+INCLUDE: %file ?"))
 org-export-with-smart-quotes t
 org-babel-load-languages '((C . t) (calc . t) (dot . t) (emacs-lisp . t) 
(haskell . t)
                            (latex . t) (lilypond . t) (lisp . t) (maxima . t) 
(octave . t)
                            (ocaml . t) (perl . t) (plantuml . t) (python . t) 
(shell . t)
                            (sql . t) (R . t))
 org-reveal-start-hook '(org-decrypt-entry)
 org-html-format-inlinetask-function 
'org-html-format-inlinetask-default-function
 org-agenda-mode-hook '(#[nil
                          "\302\303     \304\305#\210\303       
\306\307#\210\303       \310\311#\210\303       \312\313#\210\303       
\314\315#\207"
                          [org-mouse-context-menu-function

                           org-agenda-mode-map

                           org-mouse-agenda-context-menu

                           org-defkey

                           [mouse-3]

                           org-mouse-show-context-menu

                           [down-mouse-3]

                           org-mouse-move-tree-start

                           [C-mouse-4]

                           org-agenda-earlier

                           [C-mouse-5]

                           org-agenda-later

                           [drag-mouse-3]

                           #[(event)

                             "\302!\303        \304\"\203\305\306!\202\303     
\307\"\205\310\306!)\207"

                             [event --cl-var-- org-mouse-get-gesture eql :left 
org-agenda-earlier 1 :right org-agenda-later]

                             3 nil "e"]

                           ]
                          4]
                        #[nil
                          "\302\303     \304\305#\210\303       
\306\307#\210\303       \310\311#\210\303       \312\313#\210\303       
\314\315#\207"
                          [org-mouse-context-menu-function

                           org-agenda-mode-map

                           org-mouse-agenda-context-menu

                           org-defkey

                           [mouse-3]

                           org-mouse-show-context-menu

                           [down-mouse-3]

                           org-mouse-move-tree-start

                           [C-mouse-4]

                           org-agenda-earlier

                           [C-mouse-5]

                           org-agenda-later

                           [drag-mouse-3]

                           #[(event)

                             "\302!\303        \304\"\203\305\306!\202\303     
\307\"\205\310\306!)\207"

                             [event --cl-var-- org-mouse-get-gesture eql :left 
org-agenda-earlier 1 :right org-agenda-later]

                             3 nil "e"]

                           ]
                          4]
                        )
 org-agenda-files '("/home/swflint/org/main.org" 
"/home/swflint/org/carnegie-books.org"
                    "/home/swflint/org/recipes.org" 
"/home/swflint/org/notes.org"
                    "/home/swflint/org/college.org" 
"/home/swflint/org/travel-list.org"
                    "/home/swflint/org/bookmarks.org" 
"/home/swflint/org/quotes.org"
                    "/home/swflint/org/snips.org" "/home/swflint/org/agenda.org"
                    "/home/swflint/org/sicp.org" "/home/swflint/org/school.org"
                    "/home/swflint/org/library.org")
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 org-src-fontify-natively nil
 org-after-todo-statistics-hook '(org-summary-todo)
 org-tag-alist '((:startgroup) ("work" . 119) ("school" . 115) ("home" . 104) 
(:endgroup)
                 (:startgroup) ("projects" . 112) ("paper" . 114) ("misc" . 
109) (:endgroup)
                 (:startgroup) ("code" . 99) ("writing" . 119) ("other" . 111) 
(:endgroup)
                 (:startgroup) ("noexport" . 88) ("export" . 120) (:endgroup)
                 ("notes" . 110) ("nonum" . 78) ("drill" . 100) ("assignment" . 
97)
                 ("book" . 98) ("crypt" . 67))
 )

--
Samuel W. Flint
4096R/266596F4
      (9477 D23E 389E 40C5 2F10  DE19 68E5 318E 2665 96F4)
(λs.s s) λs.s s



reply via email to

[Prev in Thread] Current Thread [Next in Thread]