emacs-orgmode
[Top][All Lists]
Advanced

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

[O] Wrong agenda results in orgmode 8.3.2


From: Dr. Martin Zuther
Subject: [O] Wrong agenda results in orgmode 8.3.2
Date: Fri, 30 Oct 2015 12:36:05 +0100
User-agent: Roundcube Webmail/1.1.3

Hi!

I've been using org-mode as schedule for a while and simply love it!

Last week I tried updating org-mode from version 8.2.9 which is distributed with Emacs to the current version 8.3.2-10-g00dacf (via ELPA). Things worked quite fine, except for certain parts of my agenda where events started showing in the wrong places.

Here is a minimal test case for my agenda setup.  First the org-file:


* TODO Timestamp 1 :@work:
<2015-01-01 Do>
* Timestamp 2 :@work:
<2015-01-01 Do>
* TODO Scheduled 1                                           :@work:
SCHEDULED: <2015-01-01 Do>
* TODO Scheduled 2                                           :@work:
SCHEDULED: <2015-01-01 Do>
* TODO Scheduled 3                                           :@work:
SCHEDULED: <2015-01-01 Do>
:LOGBOOK:
:END:
* TODO Scheduled 4                                           :@work:
:LOGBOOK:
:END:
SCHEDULED: <2015-01-01 Do>
* TODO Scheduled 5                                           :@work:
SCHEDULED: <2015-01-01 Do>
* TODO Scheduled 6                                           :@work:
SCHEDULED: <2015-01-01 Do>
* TODO Timestamp 3 :@work:
<2015-01-01 Do>
* Timestamp 4 :@work:
<2015-01-01 Do>


And now, some Lisp:


(setq org-agenda-custom-commands
          '(
                ("x" "Debug"
                 ((tags-todo "address@hidden>=\"<1980-01-01>\""
                                ((org-agenda-overriding-header "Scheduled")
                                 (org-agenda-files (quote 
("C:/Users/some/place/test.org")))
                                 ))
                  (tags "address@hidden>=\"<1980-01-01>\""
                                ((org-agenda-overriding-header "Timestamp")
                                 (org-agenda-files (quote 
("C:/Users/some/place/test.org")))
                                 )))
                 nil
                 ("C:/Users/some/place/icalendar/Test.ics"))
                ))


This is what I expect to get (taken from org-mode 8.2.10):


Scheduled
test: TODO Scheduled 1 :@work: test: TODO Scheduled 2 :@work: test: TODO Scheduled 3 :@work: test: TODO Scheduled 4 :@work: test: TODO Scheduled 5 :@work: test: TODO Scheduled 6 :@work:

================================================================================
Timestamp
test: TODO Timestamp 1 :@work: test: Timestamp 2 :@work: test: TODO Timestamp 3 :@work: test: Timestamp 4 :@work:


And here is what I get in org-mode 8.3.2:


Scheduled
test: TODO Scheduled 1 :@work: test: TODO Scheduled 2 :@work: test: TODO Scheduled 3 :@work: test: TODO Scheduled 5 :@work: test: TODO Scheduled 6 :@work:

================================================================================
Timestamp
test: TODO Timestamp 1 :@work: test: Timestamp 2 :@work: test: TODO Scheduled 1 :@work: test: TODO Scheduled 2 :@work: test: TODO Scheduled 4 :@work: test: TODO Scheduled 6 :@work: test: TODO Timestamp 3 :@work: test: Timestamp 4 :@work:


Is this a problem of my set-up or did I stumble upon a bug?

Thanks for listening and have a nice week-end!

Martin


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

Emacs  : GNU Emacs 24.5.1 (i686-pc-mingw32)
 of 2015-04-11 on LEG570
Package: Org-mode version 8.3.2 (8.3.2-10-g00dacd-elpa @ c:/Users/[...]/AppData/Roaming/.emacs.d/elpa/org-20151005/)

current state:
==============
(setq
 org-enforce-todo-checkbox-dependencies t
 org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point
                                                  
org-babel-execute-safely-maybe)
org-stuck-projects '("+LEVEL=1/-DONE-WAIT" ("NEXT") ("noexport" "notstuck")
                                          "SCHEDULED:\\|DEADLINE:")
 org-tags-sort-function 'string<
 org-archive-location "c:/Users/some/location/.Archiv.org::datetree/"
 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-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
                                  org-cycle-hide-inline-tasks 
org-cycle-show-empty-lines
                                  org-optimize-window-after-visibility-change)
 org-agenda-custom-commands '(("d" "Termine (1 Woche)"
                                                           ((agenda ""
                                                                 
((org-agenda-overriding-header
                                                                   "Termine 
(heute)\n")
                                                                  
(org-agenda-span 1)
                                                                  
(org-agenda-skip-function
                                                                   (quote
                                                                        
(org-agenda-skip-entry-if (quote todo)
                                                                         (quote 
any))
                                                                        )
                                                                   )
                                                                  )
                                                                 )
                                                                (tags
                                                                 
"address@hidden<=\"<today>\"/!-DONE"
                                                                 
((org-agenda-overriding-header
                                                                   "Aufgaben 
(heute)\n")

                                                                  
(org-agenda-prefix-format "  %-20:c%?-12t% s")

                                                                  
(org-agenda-sorting-strategy

                                                                   (quote



                                                                        
(priority-down)



                                                                        )

                                                                   )

                                                                  )
                                                                 )
                                                                (tags
                                                                 
"address@hidden<=\"<today>\"/!-DONE"
                                                                 
((org-agenda-overriding-header
                                                                   "Aufgaben 
(wiederholt)\n")

                                                                  
(org-agenda-prefix-format "  %-20:c%?-12t% s")

                                                                  
(org-agenda-sorting-strategy

                                                                   (quote



                                                                        
(priority-down)



                                                                        )

                                                                   )

                                                                  )
                                                                 )
                                                                (agenda ""
                                                                 
((org-agenda-overriding-header
                                                                   "Termine 
(Woche)\n")
                                                                  (org-agenda-start-day 
"-1d")
                                                                  
(org-agenda-span 9)
                                                                  
(org-agenda-time-grid nil)
                                                                  
(org-agenda-skip-function
                                                                   (quote
                                                                        
(org-agenda-skip-entry-if (quote todo)
                                                                         (quote 
any))
                                                                        )
                                                                   )
                                                                  )
                                                                 )
                                                                )
                                                           )
                                                          ("D" "Termine (4 
Wochen)"
                                                           ((agenda ""
                                                                 
((org-agenda-span 28)
                                                                  
(org-agenda-skip-function
                                                                   (quote
                                                                        
(org-agenda-skip-entry-if (quote todo)
                                                                         (quote 
done))
                                                                        )
                                                                   )
                                                                  
(org-agenda-time-grid nil)
                                                                  
(org-agenda-entry-types (quote (:scheduled)))
                                                                  
(org-agenda-show-log t))
                                                                 )
                                                                )
                                                           )
                                                          ("w" "Projekte 
(Arbeit)"
                                                           ((tags
"address@hidden@address@hidden@phone|address@hidden@address@hidden@phone/!+NEXT|+TODO"
                                                                 
((org-agenda-overriding-header "Arbeit")

                                                                  
(org-agenda-skip-function

                                                                   (quote



                                                                        
(org-agenda-skip-entry-if







                                                                         (quote 
deadline)







                                                                         (quote 
scheduled)







                                                                         )



                                                                        )

                                                                   )

                                                                  
(org-agenda-prefix-format "  %-20:c")

                                                                  
(org-agenda-sorting-strategy

                                                                   (quote



                                                                        
(category-up alpha-up)



                                                                        )

                                                                   )

                                                                  )
                                                                 )
                                                                (tags
                                                                 
"address@hidden@meeting|address@hidden@meeting/!+NEXT|+TODO"
                                                                 
((org-agenda-overriding-header "Besprechung")

                                                                  
(org-agenda-skip-function

                                                                   (quote



                                                                        
(org-agenda-skip-entry-if







                                                                         (quote 
deadline)







                                                                         (quote 
scheduled)







                                                                         )



                                                                        )

                                                                   )

                                                                  
(org-agenda-prefix-format "  %-20:c")

                                                                  
(org-agenda-sorting-strategy

                                                                   (quote



                                                                        
(category-up alpha-up)



                                                                        )

                                                                   )

                                                                  )
                                                                 )
                                                                (tags
                                                                 
"address@hidden@computer|address@hidden@computer/!+NEXT|+TODO"
                                                                 
((org-agenda-overriding-header "Computer")

                                                                  
(org-agenda-skip-function

                                                                   (quote



                                                                        
(org-agenda-skip-entry-if







                                                                         (quote 
deadline)







                                                                         (quote 
scheduled)







                                                                         )



                                                                        )

                                                                   )

                                                                  
(org-agenda-prefix-format "  %-20:c")

                                                                  
(org-agenda-sorting-strategy

                                                                   (quote



                                                                        
(category-up alpha-up)



                                                                        )

                                                                   )

                                                                  )
                                                                 )
                                                                (tags 
"address@hidden/!+NEXT|+TODO"
                                                                 
((org-agenda-overriding-header "Einkaufen")
                                                                  
(org-agenda-skip-function
                                                                   (quote
                                                                        
(org-agenda-skip-entry-if (quote deadline)
                                                                         (quote 
scheduled))
                                                                        )
                                                                   )
                                                                  
(org-agenda-prefix-format "  %-20:c")
                                                                  
(org-agenda-sorting-strategy
                                                                   (quote 
(category-up alpha-up)))
                                                                  )
                                                                 )
                                                                (tags
                                                                 
"address@hidden@phone|address@hidden@phone/!+NEXT|+TODO"
                                                                 
((org-agenda-overriding-header "Telefon")

                                                                  
(org-agenda-skip-function

                                                                   (quote



                                                                        
(org-agenda-skip-entry-if







                                                                         (quote 
deadline)







                                                                         (quote 
scheduled)







                                                                         )



                                                                        )

                                                                   )

                                                                  
(org-agenda-prefix-format "  %-20:c")

                                                                  
(org-agenda-sorting-strategy

                                                                   (quote



                                                                        
(category-up alpha-up)



                                                                        )

                                                                   )

                                                                  )
                                                                 )
                                                                (tags
                                                                 
"address@hidden@address@hidden@work/!+NEXT|+TODO"
                                                                 
((org-agenda-overriding-header
                                                                   "Ohne 
Kategorie")

                                                                  
(org-agenda-prefix-format "  %-20:c")

                                                                  
(org-agenda-sorting-strategy

                                                                   (quote



                                                                        
(category-up alpha-up)



                                                                        )

                                                                   )

                                                                  )
                                                                 )
                                                                (tags 
"address@hidden/!+WAIT"
                                                                 
((org-agenda-overriding-header "Warten")
                                                                  
(org-agenda-prefix-format "  %-20:c")
                                                                  
(org-agenda-sorting-strategy
                                                                   (quote 
(category-up alpha-up)))
                                                                  )
                                                                 )
                                                                )
                                                           )
                                                          ("-wa" "@work 
Aufgaben"
                                                           ((tags-todo
                                                                 
"address@hidden>=\"<1980-01-01>\""
                                                                 
((org-agenda-overriding-header
                                                                   "@work 
Aufgaben")
                                                                  
(org-agenda-files
                                                                   (quote
                                                                        
("c:/Users/some/location/Termine/")
                                                                        )
                                                                   )
                                                                  
(org-agenda-sorting-strategy
                                                                   (quote 
(priority-down)))
                                                                  )
                                                                 )
                                                                )
                                                           nil
                                                           
("C:/Users/some/location/icalendar/Aufgaben.ics")
                                                           )
                                                          ("-wf" "@work 
Feiertage"
                                                           ((tags 
"+feiertag+TIMESTAMP>=\"<1980-01-01>\""
                                                                 
((org-agenda-overriding-header
                                                                   "@work 
Feiertage")
                                                                  
(org-agenda-files
                                                                   (quote
                                                                        
("c:/Users/some/location/Termine/")
                                                                        )
                                                                   )
                                                                  )
                                                                 )
                                                                )
                                                           nil
                                                           
("c:/Users/some/location/icalendar/Feiertage.ics")
                                                           )
                                                          ("-wt" "@work Termine"
                                                           ((tags
                                                                 
"address@hidden>=\"<1980-01-01>\""
                                                                 
((org-agenda-overriding-header
                                                                   "@work 
Termine")

                                                                  
(org-agenda-files

                                                                   (quote



                                                                        
("c:/Users/some/location/Termine/")



                                                                        )

                                                                   )

                                                                  )
                                                                 )
                                                                )
                                                           nil
                                                           
("c:/Users/some/location/icalendar/Termine.ics")
                                                           )
                                                          ("-wu" "@work Urlaub"
                                                           ((tags
                                                                 
"address@hidden>=\"<1980-01-01>\""
                                                                 
((org-agenda-overriding-header "@work Urlaub")
                                                                  
(org-agenda-files
                                                                   (quote
                                                                        
("c:/Users/some/location/Termine/")
                                                                        )
                                                                   )
                                                                  )
                                                                 )
                                                                )
                                                           nil
                                                           
("c:/Users/some/location/icalendar/Urlaub.ics")
                                                           )
                                                          )
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-speed-command-hook '(org-speed-command-default-hook
                                                  org-babel-speed-command-hook)
 org-blocker-hook '(org-block-todo-from-checkboxes
                                        
org-block-todo-from-children-or-siblings-or-parent)
 org-babel-pre-tangle-hook '(save-buffer)
 org-occur-hook '(org-first-headline-recenter)
 org-use-property-inheritance t
 org-cycle-separator-lines -2
 org-log-redeadline 'time
 org-log-done 'time
 org-use-sub-superscripts '{}
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-confirm-elisp-link-function 'yes-or-no-p
 org-log-into-drawer t
 org-default-notes-file "c:/Users/some/location/Eingang.org"
org-priority-faces '((65 . "red") (66 . "darkorange") (67 . "darkgreen"))
 org-ctrl-k-protect-subtree t
 org-export-backends '(ascii beamer html icalendar latex)
 org-agenda-dim-blocked-tasks nil
 org-blank-before-new-entry '((heading) (plain-list-item))
 org-tag-alist '((:startgroup) ("@anywhere" . 97) ("@home" . 104)
                                 ("@shopping" . 115) ("@work" . 119) 
(:endgroup) (:startgroup)
                                 ("@computer" . 99) ("@meeting" . 109) 
("@phone" . 112)
                                 (:endgroup) (:startgroup) ("noexport" . 120) 
(:endgroup))
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 org-enforce-todo-dependencies t
 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-special-ctrl-a/e t
 org-clock-into-drawer "LOGBOOK"
 org-agenda-default-appointment-duration 120
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-todo-keywords '((sequence "TODO(t)" "NEXT(n)" "HOLD(h)" "WAIT(w)"
                                          "MAYBE(m)" "|" "DONE(d)")
                                         )
 org-log-reschedule 'time
 org-special-ctrl-k t
 org-startup-folded 'content
 org-startup-indented t
 org-agenda-files '("c:/Users/some/location/Termine/")
 org-src-mode-hook '(org-src-babel-configure-edit-buffer
                                         org-src-mode-configure-edit-buffer)
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-todo-keyword-faces '(("TODO" . org-todo) ("NEXT" . "darkorange")
                                                  ("HOLD" . "darkgrey") ("WAIT" . 
"darkorange")
                                                  ("MAYBE" . "blue") ("DONE" . 
org-done))
 org-confirm-shell-link-function 'yes-or-no-p
 )



reply via email to

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