emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* Bug: "SCHEDULED: " positioning is fragile [7.8.06 (release_7.8.06.181.ga481)]
@ 2012-04-05 14:41 Dave Abrahams
  2012-04-06  7:38 ` Bastien
  0 siblings, 1 reply; 18+ messages in thread
From: Dave Abrahams @ 2012-04-05 14:41 UTC (permalink / raw)
  To: emacs-orgmode



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.
------------------------------------------------------------------------

Given the following:

--8<---------------cut here---------------start------------->8---
* TODO Some headline
SCHEDULED: <2012-04-05 Thu>
--8<---------------cut here---------------end--------------->8---

If I add body text between the headline and the SCHEDULED: line, some
things work, but others don't.  For example:

--8<---------------cut here---------------start------------->8---
* TODO Some headline
some body
SCHEDULED: <2012-04-05 Thu>
--8<---------------cut here---------------end--------------->8---

In agenda mode, I can hit `f' (org-agenda-date-later) and it will bump
the scheduled date forward and all is well.  However, if I hit `C-c C-s
+ RET' (org-agenda-schedule), the item changes to

--8<---------------cut here---------------start------------->8---
* TODO Some headline
SCHEDULED: <2012-04-06 Fri>
some body
SCHEDULED: <2012-04-05 Thu>
--8<---------------cut here---------------end--------------->8---

Moreover, the agenda still "thinks" this item is scheduled for
2012-04-05!  I can attempt to reschedule the item indefinitely and the
scheduled date will never appear to change, because the later one
overrides the earlier one.

There's no reason the format should be so sensitive to ordering.  If
org-agenda-date-later can do the right thing, so can org-agenda-schedule
and all the other commands that change the scheduled date of an item.

Emacs  : GNU Emacs 24.0.94.1 (x86_64-apple-darwin11.3.0, Carbon Version 1.6.0 AppKit 1138.32)
 of 2012-03-14 on pluto.luannocracy.com
Package: Org-mode version 7.8.06 (release_7.8.06.181.ga481)

current state:
==============
(setq
 org-hide-leading-stars t
 org-export-babel-evaluate nil
 org-export-preprocess-before-selecting-backend-code-hook '(org-beamer-select-beamer-code)
 org-tab-first-hook '(yas/org-very-safe-expand org-hide-block-toggle-maybe org-src-native-tab-command-maybe
                      org-babel-hide-result-toggle-maybe)
 org-adapt-indentation nil
 org-footnote-section nil
 org-time-clocksum-use-fractional t
 org-log-buffer-setup-hook '((lambda nil (setq fill-column (- fill-column 5))))
 org-habit-preceding-days 42
 org-speed-command-hook '(org-speed-command-default-hook org-babel-speed-command-hook)
 org-agenda-fontify-priorities t
 org-reverse-note-order t
 org-agenda-auto-exclude-function 'org-my-auto-exclude-function
 org-occur-hook '(org-first-headline-recenter)
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-agenda-scheduled-leaders '("" "S%d: ")
 org-agenda-start-on-weekday nil
 org-clock-into-drawer "LOGBOOK"
 org-export-preprocess-before-normalizing-links-hook '(org-remove-file-link-modifiers)
 org-confirm-shell-link-function nil
 org-x-backends '(ox-org ox-redmine)
 org-finalize-agenda-hook '(org-agenda-add-overlays)
 org-speed-commands-user '(("+" . org-priority-up) ("-" . org-priority-down))
 org-clock-idle-time 10
 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-habit-completed-glyph 10004
 org-agenda-restore-windows-after-quit t
 org-agenda-deadline-leaders '("D: " "D%d: ")
 org-pretty-entities t
 org-special-ctrl-a/e 'reversed
 org-export-latex-after-initial-vars-hook '(org-beamer-after-initial-vars)
 org-x-redmine-title-prefix-function 'org-x-redmine-title-prefix
 org-agenda-prefix-format '((agenda . "  %-11:c%?-12t% s") (timeline . "  % s") (todo . "  %-11:c") (tags . "  %-11:c"))
 org-agenda-skip-scheduled-if-done t
 org-agenda-custom-commands '(("E" "Errands (next 3 days)" tags
                               "Errand&TODO<>\"DONE\"&TODO<>\"CANCELED\"&STYLE<>\"habit\"&SCHEDULED<\"<+3d>\""
                               ((org-agenda-overriding-header "Errands (next 3 days)")))
                              ("A" "Priority #A tasks" agenda ""
                               ((org-agenda-ndays 1) (org-agenda-overriding-header "Today's priority #A tasks: ")
                                (org-agenda-skip-function (quote (org-agenda-skip-entry-if (quote notregexp) "\\=.*\\[#A\\]"))))
                               )
                              ("b" "Priority #A and #B tasks" agenda ""
                               ((org-agenda-ndays 1) (org-agenda-overriding-header "Today's priority #A and #B tasks: ")
                                (org-agenda-skip-function (quote (org-agenda-skip-entry-if (quote regexp) "\\=.*\\[#C\\]"))))
                               )
                              ("w" "Waiting/delegated tasks" tags "TODO=\"WAITING\"|TODO=\"DELEGATED\""
                               ((org-agenda-overriding-header "Waiting/delegated tasks:")
                                (org-agenda-sorting-strategy (quote (todo-state-up priority-down category-up))))
                               )
                              ("p" "Unprioritized tasks" tags
                               "AREA<>\"Work\"&TODO<>\"\"&TODO<>{DONE\\|CANCELED\\|NOTE\\|PROJECT\\|DEFERRED\\|SOMEDAY}"
                               ((org-agenda-files (quote ("~/Documents/Tasks/todo.txt")))
                                (org-agenda-overriding-header "Unprioritized tasks: ")
                                (org-agenda-skip-function (quote (org-agenda-skip-entry-if (quote regexp) "\\=.*\\[#[A-Z]\\]"))))
                               )
                              ("u" "Unscheduled tasks" tags "AREA<>\"Work\"&TODO<>\"\"&TODO<>{DONE\\|CANCELED\\|NOTE\\|PROJECT}"
                               ((org-agenda-files (quote ("~/Documents/Tasks/todo.txt")))
                                (org-agenda-overriding-header "Unscheduled tasks: ")
                                (org-agenda-skip-function
                                 (quote
                                  (org-agenda-skip-entry-if (quote scheduled) (quote deadline) (quote timestamp) (quote regexp)
                                   "\\* \\(DEFERRED\\|SOMEDAY\\)")
                                  )
                                 )
                                (org-agenda-sorting-strategy (quote (priority-down))))
                               )
                              ("U" "Deferred tasks" tags "TODO=\"DEFERRED\""
                               ((org-agenda-files (quote ("~/Documents/Tasks/todo.txt")))
                                (org-agenda-overriding-header "Deferred tasks:"))
                               )
                              ("Y" "Someday tasks" tags "TODO=\"SOMEDAY\"" ((org-agenda-overriding-header "Someday tasks:")))
                              ("G" "Ledger tasks (all)" alltodo ""
                               ((org-agenda-files (quote ("~/src/ledger/plan/TODO"))) (org-agenda-overriding-header "Ledger tasks:")
                                (org-agenda-sorting-strategy (quote (todo-state-up priority-down category-up))))
                               )
                              ("N" "Ledger tasks (all, alphabetical)" alltodo ""
                               ((org-agenda-files (quote ("~/src/ledger/plan/TODO")))
                                (org-agenda-overriding-header "Ledger tasks, alphabetical:")
                                (org-agenda-sorting-strategy (quote (alpha-up))))
                               )
                              ("l" "Ledger tasks" tags-todo "TODO<>{SOMEDAY\\|DEFERRED}"
                               ((org-agenda-files (quote ("~/src/ledger/plan/TODO"))) (org-agenda-overriding-header "Ledger tasks:")
                                (org-agenda-sorting-strategy (quote (todo-state-up priority-down category-up)))
                                (org-agenda-skip-function (quote (org-agenda-skip-entry-if (quote regexp) "\\=.*\\[#C\\]"))))
                               )
                              ("r" "Uncategorized items" tags
                               "CATEGORY=\"Inbox ===>\"&LEVEL=2&TODO<>{DONE\\|CANCELED\\|NOTE\\|PROJECT}"
                               ((org-agenda-overriding-header "Uncategorized items")))
                              ("V" "Unscheduled work-related tasks" tags
                               "AREA=\"Work\"&TODO<>\"\"&TODO<>{DONE\\|CANCELED\\|NOTE\\|PROJECT}"
                               ((org-agenda-overriding-header "Unscheduled work-related tasks")
                                (org-agenda-files (quote ("~/Documents/Tasks/todo.txt")))
                                (org-agenda-sorting-strategy (quote (category-up)))
                                (org-agenda-skip-function
                                 (quote
                                  (org-agenda-skip-entry-if (quote scheduled) (quote deadline) (quote timestamp) (quote regexp)
                                   "\\* \\(DEFERRED\\|SOMEDAY\\)")
                                  )
                                 )
                                )
                               )
                              ("W" "Work-related tasks" tags "AREA=\"Work\"&TODO<>\"\"&TODO<>{DONE\\|CANCELED\\|NOTE\\|PROJECT}"
                               ((org-agenda-overriding-header "Work-related tasks")
                                (org-agenda-files (quote ("~/Documents/Tasks/todo.txt")))
                                (org-agenda-sorting-strategy (quote (category-up priority-down todo-state-up alpha-up)))
                                (org-agenda-skip-function
                                 (quote (org-agenda-skip-entry-if (quote regexp) "\\* \\(DEFERRED\\|SOMEDAY\\)")))
                                )
                               )
                              )
 org-return-follows-link t
 org-default-notes-file "~/Documents/Tasks/todo.txt"
 org-clock-in-resume t
 org-capture-templates '(("t" "Task" entry (file+headline "~/Documents/Tasks/todo.txt" "Inbox")
                          "* TODO %?\n  SCHEDULED: %t\n  :PROPERTIES:\n  :ID:       %(shell-command-to-string \"uuidgen\")  :CREATED:  %U\n  :END:" :prepend t)
                         )
 org-agenda-include-diary t
 org-drawers '("PROPERTIES" "CLOCK" "LOGBOOK" "OUT")
 org-after-todo-state-change-hook '(org-clock-out-if-current org-checklist)
 org-todo-repeat-to-state "TODO"
 org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer)
 org-tags-column -97
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-babel-pre-tangle-hook '(save-buffer)
 org-mode-hook '((lambda nil (set (make-local-variable (quote yas/trigger-key)) [tab])
                  (add-to-list (quote org-tab-first-hook) (quote yas/org-very-safe-expand))
                  (define-key yas/keymap [tab] (quote yas/next-field)))
                 (lambda nil (local-unset-key (kbd ".,")))
                 #[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-agenda-follow-indirect t
 org-refile-targets '((nil :todo . "PROJECT") (nil :maxlevel . 2))
 org-extend-today-until 6
 org-attach-method 'mv
 org-mobile-pre-pull-hook '(my-org-convert-incoming-items)
 org-use-speed-commands t
 org-agenda-sorting-strategy '((agenda habit-down time-up todo-state-up priority-down category-keep)
                               (todo priority-down category-keep) (tags priority-down category-keep) (search category-keep))
 org-clock-persist 'history
 org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point org-babel-execute-safely-maybe)
 org-agenda-persistent-filter t
 org-clock-in-switch-to-state "STARTED"
 org-directory "~/Documents/Tasks/"
 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-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-archive-location "TODO-archive::"
 org-export-first-hook '(org-beamer-initialize-open-trackers)
 org-agenda-text-search-extra-files '(agenda-archives)
 org-habit-today-glyph 9483
 org-x-redmine-title-prefix-match-function 'org-x-redmine-title-prefix-match
 org-agenda-default-appointment-duration 60
 org-export-interblocks '((src org-babel-exp-non-block-elements))
 org-use-property-inheritance '("AREA")
 org-modules '(org-id org-info org-habit)
 org-agenda-ndays 1
 org-checkbox-statistics-hook '(dwa/checkbox-list-complete)
 org-fast-tag-selection-single-key 'expert
 org-agenda-window-setup 'current-window
 org-babel-tangle-lang-exts '(("python" . "py") ("emacs-lisp" . "el"))
 org-confirm-elisp-link-function nil
 org-edit-src-content-indentation 0
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-log-into-drawer t
 org-mobile-post-push-hook '((lambda nil (shell-command "/bin/rm -f ~/Dropbox/MobileOrg/agendas.org")
                              (shell-command
                               (concat "perl -i -ne 'print unless /agendas\\.org/;'" "~/Dropbox/MobileOrg/checksums.dat"))
                              (shell-command (concat "perl -i -ne 'print unless /agendas\\.org/;'" "~/Dropbox/MobileOrg/index.org")))
                             )
 org-insert-heading-respect-content t
 org-agenda-skip-unavailable-files t
 org-checklist-export-function 'org-export-as-ascii
 org-default-priority 67
 org-clock-modeline-total 'current
 org-blocker-hook '(org-block-todo-from-children-or-siblings-or-parent)
 org-agenda-skip-deadline-if-done t
 org-completion-use-ido t
 org-babel-load-languages '((emacs-lisp . t) (sh . t))
 org-cycle-global-at-bob t
 org-agenda-start-with-follow-mode t
 org-agenda-mode-hook '((lambda nil (local-unset-key (kbd ".,"))))
 org-agenda-files '("~/Documents/Tasks/todo.txt")
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 org-archive-save-context-info '(time category itags)
 org-src-fontify-natively t
 org-clock-out-remove-zero-time-clocks t
 org-refile-target-verify-function 'dwa/org-verify-refile-target
 org-agenda-skip-scheduled-if-deadline-is-shown t
 org-after-todo-statistics-hook '(dwa/org-summary-todo)
 )
-- 
Dave Abrahams
BoostPro Computing
http://www.boostpro.com

^ permalink raw reply	[flat|nested] 18+ messages in thread

end of thread, other threads:[~2012-04-10 14:11 UTC | newest]

Thread overview: 18+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2012-04-05 14:41 Bug: "SCHEDULED: " positioning is fragile [7.8.06 (release_7.8.06.181.ga481)] Dave Abrahams
2012-04-06  7:38 ` Bastien
2012-04-06 12:18   ` Dave Abrahams
2012-04-09 11:01     ` Bastien
2012-04-09 11:20       ` Dave Abrahams
2012-04-09 12:49         ` Bastien
2012-04-09 13:58           ` Dave Abrahams
2012-04-09 14:51             ` Bastien
2012-04-09 14:54               ` Dave Abrahams
2012-04-09 15:05                 ` Bastien
2012-04-09 15:52                   ` Dave Abrahams
2012-04-10 13:43               ` Rainer Stengele
2012-04-10 14:12                 ` Bastien
2012-04-09 20:24           ` John Wiegley
2012-04-10 12:13   ` [PATCH] " Jérémie Courrèges-Anglas
2012-04-10 12:34     ` Bastien
2012-04-10 13:34       ` Jérémie Courrèges-Anglas
2012-04-10 13:40         ` Bastien

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).