emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Dave Abrahams <dave@boostpro.com>
To: emacs-orgmode@gnu.org
Subject: Bug: "SCHEDULED: " positioning is fragile [7.8.06 (release_7.8.06.181.ga481)]
Date: Thu, 05 Apr 2012 10:41:14 -0400	[thread overview]
Message-ID: <m2iphetf5h.fsf@pluto.luannocracy.com> (raw)



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

             reply	other threads:[~2012-04-05 14:41 UTC|newest]

Thread overview: 18+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2012-04-05 14:41 Dave Abrahams [this message]
2012-04-06  7:38 ` Bug: "SCHEDULED: " positioning is fragile [7.8.06 (release_7.8.06.181.ga481)] 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

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.orgmode.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=m2iphetf5h.fsf@pluto.luannocracy.com \
    --to=dave@boostpro.com \
    --cc=emacs-orgmode@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
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).