Bug: org-agenda fails when a scheduled/deadline date is in the past [9.1.9 (release_9.1.9-65-g5e4542 @ /Users/borwick/.emacs.d/elpa/org-plus-contrib-20190218/)]

Bug: org-agenda fails when a scheduled/deadline date is in the past [9.1.9 (release_9.1.9-65-g5e4542 @ /Users/borwick/.emacs.d/elpa/org-plus-contrib-20190218/)]

[John Borwick]

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

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

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

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

If I execute in *scratch*

    (org-agenda-get-day-entries "~/Dropbox/org/main-todo.org" '(2 18 2019) :deadline :scheduled :timestamp :sexp)

and main-todo.org contains this entry:

    *** TODO Medium priority inboxes                               :@work_online:
        SCHEDULED: <2019-02-18 Mon>

(where 2019-02-18 is yesterday), I get the error "Wrong number of
arguments: (0 . 0), 2".

If I change the SCHEDULED date to today:

    *** TODO Medium priority inboxes                               :@work_online:
        SCHEDULED: <2019-02-19 Tue>

and execute the same org-agenda-get-day-entries statement, I do not get
this error.

It appears to me that there is some issue with scheduled and deadline
dates that are in the past?


I found this after finding that =C-c a a= was erroring out with the same “Wrong number of arguments: (0 . 0), 2”. Here is the backtrace from trying to show my agenda:

Debugger entered--Lisp error: (wrong-number-of-arguments (0 . 0) 2)
  org-get-tags(nil nil)
  org-agenda-get-scheduled(nil)
  org-agenda-get-day-entries("~/Dropbox/org/main-todo.org" (2 18 2019) :deadline :scheduled :timestamp :sexp)
  apply(org-agenda-get-day-entries "~/Dropbox/org/main-todo.org" (2 18 2019) (:deadline :scheduled :timestamp :sexp))
  org-agenda-list(nil)
  funcall-interactively(org-agenda-list nil)
  call-interactively(org-agenda-list)
  org-agenda(nil)
  funcall-interactively(org-agenda nil)
  call-interactively(org-agenda nil nil)
  command-execute(org-agenda)

Emacs  : GNU Emacs 26.1 (build 1, x86_64-apple-darwin14.5.0, NS appkit-1348.17 Version 10.10.5 (Build 14F2511))
of 2018-05-30
Package: Org mode version 9.1.9 (release_9.1.9-65-g5e4542 @ /Users/borwick/.emacs.d/elpa/org-plus-contrib-20190218/)

current state:
==============
(setq
org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer)
org-metadown-hook '(org-babel-pop-to-session-maybe)
org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
org-refile-targets '((("~/Dropbox/org/main-todo.org") :maxlevel . 3) (("~/Dropbox/org/projects.org") :maxlevel . 3))
org-html-format-inlinetask-function 'org-html-format-inlinetask-default-function
org-enforce-todo-dependencies t
org-odt-format-headline-function 'org-odt-format-headline-default-function
org-agenda-files '("~/Dropbox/org/inbox.org" "~/Dropbox/org/main-todo.org" "~/Dropbox/org/orgzly-inbox.org" "~/Dropbox/org/projects.org")
org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
org-tag-alist '((:startgroup) ("@errands" . 101) ("@home" . 104) ("@home_outside" . 117) ("@lauren" . 108) ("@leif" . 105) ("@now" . 110)
                        ("@online" . 111) ("@phone" . 112) ("@uw_campus" . 99) ("@uw_office" . 102) ("@work_online" . 119) (:endgroup))
org-reveal-start-hook '(org-decrypt-entry)
org-modules '(org-habit org-w3m org-bbdb org-bibtex org-docview org-gnus org-info org-irc org-mhe org-rmail)
org-startup-folded nil
org-blocker-hook '(org-block-todo-from-children-or-siblings-or-parent)
org-mode-hook '((lambda nil (org-bullets-mode 1)) visual-line-mode turn-on-flyspell org-journal-update-auto-mode-alist org-eldoc-load
                        #[0 "\300\301\302\303\304$\207" [add-hook change-major-mode-hook org-show-block-all append local] 5]
                        #[0 "\300\301\302\303\304$\207" [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-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
org-archive-hook '(org-attach-archive-delete-maybe)
org-confirm-elisp-link-function 'yes-or-no-p
org-journal-mode-hook '(#[nil "\301\b\302\303\304$\207" [org-journal-encrypt-on add-hook org-journal-encryption-hook nil t] 5]
                                    (lambda nil (add-hook org-journal-encrypt-on (quote org-journal-encryption-hook) nil t)))
org-agenda-before-write-hook '(org-agenda-add-entry-text)
org-metaup-hook '(org-babel-load-in-session-maybe)
org-bibtex-headline-format-function #[257 "\300\236A\207" [:title] 3 "\n\n(fn ENTRY)"]
org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"]
org-babel-pre-tangle-hook '(save-buffer)
org-tab-first-hook '(org-babel-hide-result-toggle-maybe org-babel-header-arg-expand)
org-ascii-format-drawer-function #[771 "\207" [] 4 "\n\n(fn NAME CONTENTS WIDTH)"]
org-src-lang-modes '(("redis" . redis) ("php" . php) ("arduino" . arduino) ("ocaml" . tuareg) ("elisp" . emacs-lisp) ("ditaa" . artist)
                              ("asymptote" . asy) ("dot" . fundamental) ("sqlite" . sql) ("calc" . fundamental) ("C" . c) ("cpp" . c++)
                              ("C++" . c++) ("screen" . shell-script) ("shell" . sh) ("bash" . sh))
org-occur-hook '(org-first-headline-recenter)
org-agenda-mode-hook '(org-journal-update-org-agenda-files)
org-log-into-drawer 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-todo-keywords '((sequence "TODO(t)" "WORKING(n)" "WAITING(w@/!)" "POSTPONED(p)" "|" "DONE(d@/!)" "CANCELLED(c)"))
org-speed-command-hook '(org-speed-command-activate org-babel-speed-command-activate)
org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
org-journal-dir "~/Dropbox/org/journal"
org-journal-enable-encryption t
org-confirm-shell-link-function 'yes-or-no-p
org-link-parameters '(("id" :follow org-id-open) ("jekyll-post" :follow org-jekyll-post-link-follow :export org-jekyll-post-link-export)
                               ("rmail" :follow org-rmail-open :store org-rmail-store-link) ("mhe" :follow org-mhe-open :store org-mhe-store-link)
                               ("irc" :follow org-irc-visit :store org-irc-store-link)
                               ("info" :follow org-info-open :export org-info-export :store org-info-store-link)
                               ("gnus" :follow org-gnus-open :store org-gnus-store-link)
                               ("docview" :follow org-docview-open :export org-docview-export :store org-docview-store-link)
                               ("bibtex" :follow org-bibtex-open :store org-bibtex-store-link)
                               ("bbdb" :follow org-bbdb-open :export org-bbdb-export :complete org-bbdb-complete-link :store org-bbdb-store-link)
                               ("w3m" :store org-w3m-store-link) ("file+sys") ("file+emacs") ("doi" :follow org--open-doi-link)
                               ("elisp" :follow org--open-elisp-link) ("file" :complete org-file-complete-link)
                               ("ftp" :follow (lambda (path) (browse-url (concat "ftp:" path)))) ("help" :follow org--open-help-link)
                               ("http" :follow (lambda (path) (browse-url (concat "http:" path))))
                               ("https" :follow (lambda (path) (browse-url (concat "https:" path))))
                               ("mailto" :follow (lambda (path) (browse-url (concat "mailto:" path))))
                               ("news" :follow (lambda (path) (browse-url (concat "news:" path)))) ("shell" :follow org--open-shell-link))
org-latex-format-headline-function 'org-latex-format-headline-default-function
org-todo-keyword-faces '(("WORKING" . "orange") ("CANCELLED" . "grey"))
org-latex-format-inlinetask-function 'org-latex-format-inlinetask-default-function
org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
org-journal-file-format "%Y-%m-%d.org"
org-html-format-headline-function 'org-html-format-headline-default-function
org-agenda-custom-commands '(("w" "Work agenda"
                                           ((tags-todo "PRIORITY=\"A\"") (agenda "" ((org-agenda-span 1)))
                                                (tags-todo "-@errands&-@home&-@online&-TODO=\"WAITING\"") (todo "WAITING"))
                                           ((org-agenda-compact-blocks t)))
                                          ("h" "Home agenda"
                                           ((tags-todo "PRIORITY=\"A\"") (agenda "" ((org-agenda-span 1)))
                                                (tags-todo "-@work_online&-TODO=\"WAITING\"") (todo "WAITING"))
                                           )
                                          )
org-directory "~/Dropbox/org/"
org-default-notes-file "~/Dropbox/org/inbox.org"
)

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

Re: org-agenda fails when a scheduled/deadline date is in the past [9.1.9 (release_9.1.9-65-g5e4542 @ /Users/borwick/.emacs.d/elpa/org-plus-contrib-20190218/)]

[John Borwick]

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

PS in bisecting this issue vs the org-plus-contrib tarballs on https://orgmode.org/elpa/ , 20181224 works and 20181230 doesn’t.

I hope that is useful. I’m sorry I don’t know more about lisp to dig into what’s happening. Maybe something about org-get-tags-at being changed to org-get-tags?

From: John Borwick <borwick@uw.edu>
Date: Tuesday, February 19, 2019 at 11:13 AM
To: "emacs-orgmode@gnu.org" <emacs-orgmode@gnu.org>
Subject: Bug: org-agenda fails when a scheduled/deadline date is in the past [9.1.9 (release_9.1.9-65-g5e4542 @ /Users/borwick/.emacs.d/elpa/org-plus-contrib-20190218/)]

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

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

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

If I execute in *scratch*

    (org-agenda-get-day-entries "~/Dropbox/org/main-todo.org" '(2 18 2019) :deadline :scheduled :timestamp :sexp)

and main-todo.org contains this entry:

    *** TODO Medium priority inboxes                               :@work_online:
        SCHEDULED: <2019-02-18 Mon>

(where 2019-02-18 is yesterday), I get the error "Wrong number of
arguments: (0 . 0), 2".

If I change the SCHEDULED date to today:

    *** TODO Medium priority inboxes                               :@work_online:
        SCHEDULED: <2019-02-19 Tue>

and execute the same org-agenda-get-day-entries statement, I do not get
this error.

It appears to me that there is some issue with scheduled and deadline
dates that are in the past?


I found this after finding that =C-c a a= was erroring out with the same “Wrong number of arguments: (0 . 0), 2”. Here is the backtrace from trying to show my agenda:

Debugger entered--Lisp error: (wrong-number-of-arguments (0 . 0) 2)
  org-get-tags(nil nil)
  org-agenda-get-scheduled(nil)
  org-agenda-get-day-entries("~/Dropbox/org/main-todo.org" (2 18 2019) :deadline :scheduled :timestamp :sexp)
  apply(org-agenda-get-day-entries "~/Dropbox/org/main-todo.org" (2 18 2019) (:deadline :scheduled :timestamp :sexp))
  org-agenda-list(nil)
  funcall-interactively(org-agenda-list nil)
  call-interactively(org-agenda-list)
  org-agenda(nil)
  funcall-interactively(org-agenda nil)
  call-interactively(org-agenda nil nil)
  command-execute(org-agenda)

Emacs  : GNU Emacs 26.1 (build 1, x86_64-apple-darwin14.5.0, NS appkit-1348.17 Version 10.10.5 (Build 14F2511))
of 2018-05-30
Package: Org mode version 9.1.9 (release_9.1.9-65-g5e4542 @ /Users/borwick/.emacs.d/elpa/org-plus-contrib-20190218/)

current state:
==============
(setq
org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer)
org-metadown-hook '(org-babel-pop-to-session-maybe)
org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
org-refile-targets '((("~/Dropbox/org/main-todo.org") :maxlevel . 3) (("~/Dropbox/org/projects.org") :maxlevel . 3))
org-html-format-inlinetask-function 'org-html-format-inlinetask-default-function
org-enforce-todo-dependencies t
org-odt-format-headline-function 'org-odt-format-headline-default-function
org-agenda-files '("~/Dropbox/org/inbox.org" "~/Dropbox/org/main-todo.org" "~/Dropbox/org/orgzly-inbox.org" "~/Dropbox/org/projects.org")
org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
org-tag-alist '((:startgroup) ("@errands" . 101) ("@home" . 104) ("@home_outside" . 117) ("@lauren" . 108) ("@leif" . 105) ("@now" . 110)
                        ("@online" . 111) ("@phone" . 112) ("@uw_campus" . 99) ("@uw_office" . 102) ("@work_online" . 119) (:endgroup))
org-reveal-start-hook '(org-decrypt-entry)
org-modules '(org-habit org-w3m org-bbdb org-bibtex org-docview org-gnus org-info org-irc org-mhe org-rmail)
org-startup-folded nil
org-blocker-hook '(org-block-todo-from-children-or-siblings-or-parent)
org-mode-hook '((lambda nil (org-bullets-mode 1)) visual-line-mode turn-on-flyspell org-journal-update-auto-mode-alist org-eldoc-load
                        #[0 "\300\301\302\303\304$\207" [add-hook change-major-mode-hook org-show-block-all append local] 5]
                        #[0 "\300\301\302\303\304$\207" [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-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
org-archive-hook '(org-attach-archive-delete-maybe)
org-confirm-elisp-link-function 'yes-or-no-p
org-journal-mode-hook '(#[nil "\301\b\302\303\304$\207" [org-journal-encrypt-on add-hook org-journal-encryption-hook nil t] 5]
                                    (lambda nil (add-hook org-journal-encrypt-on (quote org-journal-encryption-hook) nil t)))
org-agenda-before-write-hook '(org-agenda-add-entry-text)
org-metaup-hook '(org-babel-load-in-session-maybe)
org-bibtex-headline-format-function #[257 "\300\236A\207" [:title] 3 "\n\n(fn ENTRY)"]
org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"]
org-babel-pre-tangle-hook '(save-buffer)
org-tab-first-hook '(org-babel-hide-result-toggle-maybe org-babel-header-arg-expand)
org-ascii-format-drawer-function #[771 "\207" [] 4 "\n\n(fn NAME CONTENTS WIDTH)"]
org-src-lang-modes '(("redis" . redis) ("php" . php) ("arduino" . arduino) ("ocaml" . tuareg) ("elisp" . emacs-lisp) ("ditaa" . artist)
                              ("asymptote" . asy) ("dot" . fundamental) ("sqlite" . sql) ("calc" . fundamental) ("C" . c) ("cpp" . c++)
                              ("C++" . c++) ("screen" . shell-script) ("shell" . sh) ("bash" . sh))
org-occur-hook '(org-first-headline-recenter)
org-agenda-mode-hook '(org-journal-update-org-agenda-files)
org-log-into-drawer 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-todo-keywords '((sequence "TODO(t)" "WORKING(n)" "WAITING(w@/!)" "POSTPONED(p)" "|" "DONE(d@/!)" "CANCELLED(c)"))
org-speed-command-hook '(org-speed-command-activate org-babel-speed-command-activate)
org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
org-journal-dir "~/Dropbox/org/journal"
org-journal-enable-encryption t
org-confirm-shell-link-function 'yes-or-no-p
org-link-parameters '(("id" :follow org-id-open) ("jekyll-post" :follow org-jekyll-post-link-follow :export org-jekyll-post-link-export)
                               ("rmail" :follow org-rmail-open :store org-rmail-store-link) ("mhe" :follow org-mhe-open :store org-mhe-store-link)
                               ("irc" :follow org-irc-visit :store org-irc-store-link)
                               ("info" :follow org-info-open :export org-info-export :store org-info-store-link)
                               ("gnus" :follow org-gnus-open :store org-gnus-store-link)
                               ("docview" :follow org-docview-open :export org-docview-export :store org-docview-store-link)
                               ("bibtex" :follow org-bibtex-open :store org-bibtex-store-link)
                               ("bbdb" :follow org-bbdb-open :export org-bbdb-export :complete org-bbdb-complete-link :store org-bbdb-store-link)
                               ("w3m" :store org-w3m-store-link) ("file+sys") ("file+emacs") ("doi" :follow org--open-doi-link)
                               ("elisp" :follow org--open-elisp-link) ("file" :complete org-file-complete-link)
                               ("ftp" :follow (lambda (path) (browse-url (concat "ftp:" path)))) ("help" :follow org--open-help-link)
                               ("http" :follow (lambda (path) (browse-url (concat "http:" path))))
                               ("https" :follow (lambda (path) (browse-url (concat "https:" path))))
                               ("mailto" :follow (lambda (path) (browse-url (concat "mailto:" path))))
                               ("news" :follow (lambda (path) (browse-url (concat "news:" path)))) ("shell" :follow org--open-shell-link))
org-latex-format-headline-function 'org-latex-format-headline-default-function
org-todo-keyword-faces '(("WORKING" . "orange") ("CANCELLED" . "grey"))
org-latex-format-inlinetask-function 'org-latex-format-inlinetask-default-function
org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
org-journal-file-format "%Y-%m-%d.org"
org-html-format-headline-function 'org-html-format-headline-default-function
org-agenda-custom-commands '(("w" "Work agenda"
                                           ((tags-todo "PRIORITY=\"A\"") (agenda "" ((org-agenda-span 1)))
                                                (tags-todo "-@errands&-@home&-@online&-TODO=\"WAITING\"") (todo "WAITING"))
                                           ((org-agenda-compact-blocks t)))
                                          ("h" "Home agenda"
                                           ((tags-todo "PRIORITY=\"A\"") (agenda "" ((org-agenda-span 1)))
                                                (tags-todo "-@work_online&-TODO=\"WAITING\"") (todo "WAITING"))
                                           )
                                          )
org-directory "~/Dropbox/org/"
org-default-notes-file "~/Dropbox/org/inbox.org"
)

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

Re: Bug: org-agenda fails when a scheduled/deadline date is in the past [9.1.9 (release_9.1.9-65-g5e4542 @ /Users/borwick/.emacs.d/elpa/org-plus-contrib-20190218/)]

[Nicolas Goaziou]

Hello,

John Borwick <borwick@uw.edu> writes:

> If I execute in *scratch*
>
>     (org-agenda-get-day-entries "~/Dropbox/org/main-todo.org" '(2 18 2019) :deadline :scheduled :timestamp :sexp)
>
> and main-todo.org contains this entry:
>
>     *** TODO Medium priority inboxes                               :@work_online:
>         SCHEDULED: <2019-02-18 Mon>
>
> (where 2019-02-18 is yesterday), I get the error "Wrong number of
> arguments: (0 . 0), 2".
>
> If I change the SCHEDULED date to today:
>
>     *** TODO Medium priority inboxes                               :@work_online:
>         SCHEDULED: <2019-02-19 Tue>
>
> and execute the same org-agenda-get-day-entries statement, I do not get
> this error.
>
> It appears to me that there is some issue with scheduled and deadline
> dates that are in the past?
>
>
> I found this after finding that =C-c a a= was erroring out with the same “Wrong number of arguments: (0 . 0), 2”. Here is the backtrace from trying to show my agenda:
>
> Debugger entered--Lisp error: (wrong-number-of-arguments (0 . 0) 2)
>   org-get-tags(nil nil)

Could you use latest Org release and try again. It might have been fixed
in the meantime.

Thank you!

Regards,

-- 
Nicolas Goaziou