Re: Feature request: Allow clocktable :link to use IDs rather than fuzzy search in links

2019-12-19 Thread Robert Irelan
Now that Org 9.3 has been released, I'd like to bring this issue up again.

On Wed, Sep 25, 2019 at 1:13 PM Robert Irelan  wrote:

> The :link header argument on clock tables (see
> https://orgmode.org/manual/The-clock-table.html) currently generates
> links that use fuzzy search when `:link t` is set. I'd like to propose
> that this setting respect `org-id-link-to-org-use-id`. For example, if
> I have `org-id-link-to-org-use-id` set to `t`, I'd like to have an ID
> created for the entry in the clock table, if necessary, and then
> create the link in the table using the ID instead of a search.
>
> Context: I'm currently trying to publish an Org file that contains my
> daily journal entries. In every entry, I generate clock tables
> containing the tasks I've clocked time on that day. However, some of
> the entries link to headlines that no longer exist. For whatever
> reason, setting `org-export-with-broken-links` doesn't work to avoid
> aborting the export whenever it encounters a fuzzy search link that
> can't be resolved.
>
> --
> Robert Irelan
> rire...@gmail.com
>


-- 
Robert Irelan
rire...@gmail.com


[O] [PATCH] Document "help:" Org link type in manual

2019-10-08 Thread Robert Irelan
Patch attached

-- 
Robert Irelan
rire...@gmail.com
From 31867e399f00093647c1b0583b7682b407be5b55 Mon Sep 17 00:00:00 2001
From: Robert Irelan 
Date: Tue, 8 Oct 2019 03:17:49 -0700
Subject: [PATCH] Document "help:" Org link type

---
 doc/org-manual.org | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/doc/org-manual.org b/doc/org-manual.org
index d4b1aa957..81e593c93 100644
--- a/doc/org-manual.org
+++ b/doc/org-manual.org
@@ -3151,6 +3151,7 @@ ** External Links
 #+cindex: MH-E links
 #+cindex: Usenet links
 #+cindex: shell links
+#+cindex: Help links
 #+cindex: Info links
 #+cindex: Elisp links
 
@@ -3186,6 +3187,7 @@ ** External Links
 | =gnus:group#id=   | Gnus article link  |
 | =bbdb:R.*Stallman=| BBDB link (with regexp)|
 | =irc:/irc.com/#emacs/bob= | IRC link   |
+| =help:org-store-link= | Emacs documentation of symbol  |
 | =info:org#External links= | Info node link |
 | =shell:ls *.org=  | shell command  |
 | =elisp:org-agenda=| interactive Elisp command  |
-- 
2.23.0.581.g78d2f28ef7-goog



[O] Bug: org-publish-resolve-external-link doesn't respect org-export-with-broken-links for fuzzy links

2019-09-27 Thread Robert Irelan
Patch to fix attached

-- 
Robert Irelan
rire...@gmail.com
From 3d3008398abb6c3a8cdfd796e6daa3f3ba909ad2 Mon Sep 17 00:00:00 2001
From: Robert Irelan 
Date: Fri, 27 Sep 2019 12:19:03 -0700
Subject: [PATCH] ox-publish: signal org-link-broken for broken fuzzy links

* lisp/ox-publish.el (org-publish-resolve-external-link): Signal
`org-link-broken' when `org-link-search' fails to resolve a link.
Without this change, a broken fuzzy link will always abort the export
even when `org-export-with-broken-links' is non-nil.
---
 lisp/ox-publish.el | 5 -
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lisp/ox-publish.el b/lisp/ox-publish.el
index 8928301fd..92a8aead3 100644
--- a/lisp/ox-publish.el
+++ b/lisp/ox-publish.el
@@ -1171,7 +1171,10 @@ (defun org-publish-resolve-external-link (search file  prefer-custom)
 	   (with-current-buffer (find-file-noselect file)
 	 (org-with-point-at 1
 	   (let ((org-link-search-must-match-exact-headline t))
-		 (org-link-search search nil t))
+		 (condition-case err
+		 (org-link-search search nil t)
+		   (error
+		(signal 'org-link-broken (cdr err)
 	   (and (org-at-heading-p)
 		(org-string-nw-p (org-entry-get (point) "CUSTOM_ID"
((not org-publish-cache)
-- 
2.23.0.444.g18eeb5a265-goog



[O] Feature request: Allow clocktable :link to use IDs rather than fuzzy search in links

2019-09-25 Thread Robert Irelan
The :link header argument on clock tables (see
https://orgmode.org/manual/The-clock-table.html) currently generates
links that use fuzzy search when `:link t` is set. I'd like to propose
that this setting respect `org-id-link-to-org-use-id`. For example, if
I have `org-id-link-to-org-use-id` set to `t`, I'd like to have an ID
created for the entry in the clock table, if necessary, and then
create the link in the table using the ID instead of a search.

Context: I'm currently trying to publish an Org file that contains my
daily journal entries. In every entry, I generate clock tables
containing the tasks I've clocked time on that day. However, some of
the entries link to headlines that no longer exist. For whatever
reason, setting `org-export-with-broken-links` doesn't work to avoid
aborting the export whenever it encounters a fuzzy search link that
can't be resolved.

-- 
Robert Irelan
rire...@gmail.com



Re: [O] Bug: org-map-drill-entries fails in org-tags-expand on empty string

2019-02-01 Thread Robert Irelan
Hi, could someone take a look at this? Other people have noticed this
issue: https://lists.gnu.org/archive/html/emacs-orgmode/2019-01/msg00096.html

On Wed, Jan 23, 2019 at 11:18 AM Robert Irelan  wrote:
>
> Patch to fix attached.



-- 
Robert Irelan
rire...@gmail.com



[O] Bug: org-map-drill-entries fails in org-tags-expand on empty string

2019-01-23 Thread Robert Irelan
Patch to fix attached.
From a3af9004fbc5a8a86ba8f990d393403ec671f9bf Mon Sep 17 00:00:00 2001
From: Robert Irelan 
Date: Wed, 23 Jan 2019 11:11:14 -0800
Subject: [PATCH] org-drill: Fix tag match in org-map-drill-entries

* contrib/lisp/org-drill.el: Change MATCH argument to ORG-MAP-ENTRIES
from "" to nil.

Without this, org-tags-expand will throw an error on the empty string.
---
 contrib/lisp/org-drill.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/contrib/lisp/org-drill.el b/contrib/lisp/org-drill.el
index c7f509bff..895003395 100644
--- a/contrib/lisp/org-drill.el
+++ b/contrib/lisp/org-drill.el
@@ -1483,10 +1483,10 @@ the current topic."
  (when (and (not (org-invisible-p))
 (> (org-current-level) drill-entry-level))
(when (or (/= (org-current-level) (1+ drill-entry-level))
-(funcall test))
+ (funcall test))
  (hide-subtree))
(push (point) drill-sections)))
-   "" 'tree))
+   nil 'tree))
 (reverse drill-sections)))
 
 
-- 
2.20.1.321.g9e740568ce-goog



[O] Run C-c C-c fixups everywhere in a file?

2018-08-24 Thread Robert Irelan
Hi,

The C-c C-C command does a variety of actions to improve the
consistency of an Org-mode file, such as updating timestamps,
realigning tables, etc. Has anyone created a command to run all of
these actions everywhere in a file where C-c C-c merely reformats or
fixes the file, as opposed to changing state (as it does on
checkboxes)? I'm envisioning something using the org-element API.

-- 
Robert Irelan
rire...@gmail.com



[O] Bug: (org-clock-in 4) fails from non-Org buffer due to nil org-complex-heading-regexp [9.1.13 (9.1.13-elpaplus @ ~/.emacs.d/elpa/org-plus-contrib-20180702/)]

2018-07-16 Thread Robert Irelan
tmp)))
   )
  )
 (call-interactively (quote
org-occur-in-agenda-files)))
)
   "")
  ("Q" . "Custom queries")
  ("u" "Unscheduled TODOs" todo ""
   ((org-agenda-skip-function
     (quote
  (org-agenda-skip-entry-if (quote
scheduled) (quote deadline) (quote regexp) "\n]+>")
  )
 )
(org-agenda-overriding-header
"Unscheduled TODO entries: ")
(org-agenda-sorting-strategy (quote
(time-down
   )
  ("n" "Agenda and all TODOs" ((agenda "")
(alltodo)))
  ("n" "Agenda and all TODOs" ((agenda "")
(alltodo ""
 org-ref-notes-function 'org-ref-notes-function-one-file
 org-clock-clocked-in-display 'frame-title
 org-drill-add-random-noise-to-intervals-p t
 org-pomodoro-short-break-finished-hook
'(my-org-pomodoro-short-break-finished-punch-in)
 org-pomodoro-short-break-sound
"~/.emacs.d/elpa/org-pomodoro-20171108.1314/resources/bell.wav"
 org-agenda-skip-deadline-if-done t
 org-drill-left-cloze-delimiter "!|"
 org-drill-scope 'agenda-with-archives
 org-agenda-todo-ignore-scheduled 'future
 org-agenda-start-on-weekday nil
 org-pomodoro-long-break-sound
"~/.emacs.d/elpa/org-pomodoro-20171108.1314/resources/bell_multiple.wav"
 org-list-allow-alphabetical t
 org-clock-persist-query-resume nil
 )


-- 
Robert Irelan
rire...@gmail.com



Re: [O] Does :block field of clocktable respect org-extend-today-until?

2018-06-26 Thread Robert Irelan
I've attached a patch on top of my first patch, containing tests.

On Mon, May 7, 2018 at 1:38 PM Nicolas Goaziou  wrote:
>
> Hello,
>
> Robert Irelan  writes:
>
> > I've rebased against latest master and attached the patch.
>
> It looks good, thank you.
>
> Would you mind proving a couple of regression tests, e.g., in
> "test-org-clock.el"?
>
> Regards,
>
> --
> Nicolas Goaziou



-- 
Robert Irelan
rire...@gmail.com
From a7b1a3163d36a7d715abcce096c60ec50bb40658 Mon Sep 17 00:00:00 2001
From: Robert Irelan 
Date: Tue, 26 Jun 2018 18:33:39 -0700
Subject: [PATCH 2/2] Add tests for clocktable behavior under
 org-extend-today-until

---
 testing/lisp/test-org-clock.el | 50 ++
 1 file changed, 50 insertions(+)

diff --git a/testing/lisp/test-org-clock.el b/testing/lisp/test-org-clock.el
index e85325c14..abb3637bd 100644
--- a/testing/lisp/test-org-clock.el
+++ b/testing/lisp/test-org-clock.el
@@ -979,5 +979,55 @@ CLOCK: [2017-12-27 Wed 08:00]--[2017-12-27 Wed 16:00] =>  8:00"
 		  (concat ":step day :tstart \"<2017-12-25 Mon>\" "
 			  ":tend \"<2017-12-27 Wed 23:59>\" :stepskip0 t")))
 
+(ert-deftest test-org-clock/clocktable/extend-today-until ()
+  "Test assignment of clock time to days in presence of \"org-extend-today-until\"."
+  ;; Basic test of :block with org-extend-today-until - the report for
+  ;; 2017-09-30 should include the time clocked on 2017-10-01 before
+  ;; 04:00.
+  (should
+   (equal "| Headline | Time   |
+|--+|
+| *Total time* | *2:00* |
+|--+|
+| Foo  | 2:00   |"
+	  (org-test-with-temp-text
+	   "* Foo
+CLOCK: [2017-09-30 Sat 12:00]--[2017-09-30 Sat 13:00] =>  1:00
+CLOCK: [2017-10-01 Sun 02:00]--[2017-10-01 Sun 03:00] =>  1:00
+CLOCK: [2017-10-01 Sun 11:00]--[2017-10-01 Sun 13:00] =>  2:00"
+	   (setq-local org-extend-today-until 4)
+	   (let ((system-time-locale "en_US"))
+	 (test-org-clock-clocktable-contents
+	  ":block 2017-09-30")
+
+  ;; Week-length block - time on Monday before 04:00 should be
+  ;; assigned to previous week.
+  (should
+   (equal "
+Weekly report starting on: [2017-10-01 Sun]
+| Headline | Time   |
+|--+|
+| *Total time* | *2:00* |
+|--+|
+| Foo  | 2:00   |
+
+Weekly report starting on: [2017-10-02 Mon]
+| Headline | Time   |
+|--+|
+| *Total time* | *2:00* |
+|--+|
+| Foo  | 2:00   |
+"
+	  (org-test-with-temp-text
+	   "* Foo
+CLOCK: [2017-10-01 Sun 12:00]--[2017-10-01 Sun 13:00] =>  1:00
+CLOCK: [2017-10-02 Mon 02:00]--[2017-10-02 Mon 03:00] =>  1:00
+CLOCK: [2017-10-02 Mon 11:00]--[2017-10-02 Mon 13:00] =>  2:00"
+	   (setq-local org-extend-today-until 4)
+	   (let ((system-time-locale "en_US"))
+	 (test-org-clock-clocktable-contents
+	  ":step week :block 2017-10 :stepskip0 t"))
+
+
 (provide 'test-org-clock)
 ;;; test-org-clock.el end here
-- 
2.18.0.rc2.346.g013aa6912e-goog

From dceba0d0964bce75cf78246f33becd0fbe543b7d Mon Sep 17 00:00:00 2001
From: Robert Irelan 
Date: Mon, 30 Apr 2018 17:18:16 -0700
Subject: [PATCH 1/2] Make org-extend-today-until work for clocktable block

org-clock: Properly handle `org-extend-today-until' in clock tables

 * lisp/org-clock.el (org-clock-special-range): Handle non-default
   `org-extend-today-until' when generating a clock table with the
   `:block` directive.

 Reported-by: Robert Irelan 
 <http://lists.gnu.org/archive/html/emacs-orgmode/2018-04/msg00294.html>
---
 lisp/org-clock.el | 18 --
 1 file changed, 12 insertions(+), 6 deletions(-)

diff --git a/lisp/org-clock.el b/lisp/org-clock.el
index b769a4fed..f2562fb6d 100644
--- a/lisp/org-clock.el
+++ b/lisp/org-clock.el
@@ -2200,13 +2200,17 @@ have priority."
 	(`lastq (setq key 'quarter shift -1
 ;; Prepare start and end times depending on KEY's type.
 (pcase key
-  ((or `day `today) (setq m 0 h 0 h1 24 d (+ d shift)))
+  ((or `day `today) (setq m 0
+  h org-extend-today-until
+  h1 (+ 24 org-extend-today-until)
+  d (+ d shift)))
   ((or `week `thisweek)
(let* ((ws (or wstart 1))
 	  (diff (+ (* -7 shift) (if (= dow 0) (- 7 ws) (- dow ws)
-	 (setq m 0 h 0 d (- d diff) d1 (+ 7 d
+	 (setq m 0 h org-extend-today-until d (- d diff) d1 (+ 7 d
   ((or `month `thismonth)
-   (setq h 0 m 0 d (or mstart 1) month (+ month shift) month1 (1+ month)))
+   (setq h org-extend-today-until m 0 d (or mstart 1)
+ month (+ month shift) month1 (1+ month)))
   ((or `quarter `thisq)
;; Compute if this shift remains in this year.  If not, c

Re: [O] Does :block field of clocktable respect org-extend-today-until?

2018-05-07 Thread Robert Irelan
I've rebased against latest master and attached the patch.
On Mon, May 7, 2018 at 11:05 AM Nicolas Goaziou <m...@nicolasgoaziou.fr>
wrote:

> Hello,

> Robert Irelan <rire...@gmail.com> writes:

> > Hi, is there anything else I should do on this patch?

> Would you mind sending it to the ML? It easier, at least for me, to
> review or apply.

> Thank you.

> Regards,

> --
> Nicolas Goaziou        0x80A93738



-- 
Robert Irelan
rire...@gmail.com
From 8b679dbd5a308561209c142bf806d13e2ee0ec10 Mon Sep 17 00:00:00 2001
From: Robert Irelan <rmire...@google.com>
Date: Mon, 30 Apr 2018 17:18:16 -0700
Subject: [PATCH] Make org-extend-today-until work for clocktable block

org-clock: Properly handle `org-extend-today-until' in clock tables

 * lisp/org-clock.el (org-clock-special-range): Handle non-default
   `org-extend-today-until' when generating a clock table with the
   `:block` directive.

 Reported-by: Robert Irelan <rire...@gmail.com>
 <http://lists.gnu.org/archive/html/emacs-orgmode/2018-04/msg00294.html>
---
 lisp/org-clock.el | 18 --
 1 file changed, 12 insertions(+), 6 deletions(-)

diff --git a/lisp/org-clock.el b/lisp/org-clock.el
index d727fa150..5eaff8c8a 100644
--- a/lisp/org-clock.el
+++ b/lisp/org-clock.el
@@ -2201,13 +2201,17 @@ have priority."
 	(`lastq (setq key 'quarter shift -1
 ;; Prepare start and end times depending on KEY's type.
 (pcase key
-  ((or `day `today) (setq m 0 h 0 h1 24 d (+ d shift)))
+  ((or `day `today) (setq m 0
+  h org-extend-today-until
+  h1 (+ 24 org-extend-today-until)
+  d (+ d shift)))
   ((or `week `thisweek)
(let* ((ws (or wstart 1))
 	  (diff (+ (* -7 shift) (if (= dow 0) (- 7 ws) (- dow ws)
-	 (setq m 0 h 0 d (- d diff) d1 (+ 7 d
+	 (setq m 0 h org-extend-today-until d (- d diff) d1 (+ 7 d
   ((or `month `thismonth)
-   (setq h 0 m 0 d (or mstart 1) month (+ month shift) month1 (1+ month)))
+   (setq h org-extend-today-until m 0 d (or mstart 1)
+ month (+ month shift) month1 (1+ month)))
   ((or `quarter `thisq)
;; Compute if this shift remains in this year.  If not, compute
;; how many years and quarters we have to shift (via floor*) and
@@ -2225,14 +2229,16 @@ have priority."
 	 (setq shiftedy (- y (+ 1 (nth 0 tmp)))
 		   shiftedm (- 13 (* 3 (nth 1 tmp)))
 		   shiftedq (- 5 (nth 1 tmp)
-	 (setq m 0 h 0 d 1 month shiftedm month1 (+ 3 shiftedm) y shiftedy))
+	 (setq m 0 h org-extend-today-until d 1
+   month shiftedm month1 (+ 3 shiftedm) y shiftedy))
 	((> (+ q shift) 0)		; Shift is within this year.
 	 (setq shiftedq (+ q shift))
 	 (setq shiftedy y)
 	 (let ((qshift (* 3 (1- (+ q shift)
-	   (setq m 0 h 0 d 1 month (+ 1 qshift) month1 (+ 4 qshift))
+	   (setq m 0 h org-extend-today-until d 1
+ month (+ 1 qshift) month1 (+ 4 qshift))
   ((or `year `thisyear)
-   (setq m 0 h 0 d 1 month 1 y (+ y shift) y1 (1+ y)))
+   (setq m 0 h org-extend-today-until d 1 month 1 y (+ y shift) y1 (1+ y)))
   ((or `interactive `untilnow))	; Special cases, ignore them.
   (_ (user-error "No such time block %s" key)))
 ;; Format start and end times according to AS-STRINGS.
-- 
2.17.0.441.gb46fe60e1d-goog



Re: [O] Does :block field of clocktable respect org-extend-today-until?

2018-05-07 Thread Robert Irelan
Hi, is there anything else I should do on this patch?
On Tue, May 1, 2018 at 12:40 PM Robert Irelan <rire...@gmail.com> wrote:

> I've updated my repo at https://github.com/telotortium/org-mode (branch
> org-clock-table-extend-today-until-block). (I know I cloned it from an
older
> org-mode repo on Github, but I've updated it so that my branch is rebased
> onto
> the current master.) I hope that'll work.
> On Tue, May 1, 2018 at 1:11 AM Bastien <b...@gnu.org> wrote:

> > Hi Robert,

> > Robert Irelan <rire...@gmail.com> writes:

> > > I have a patch to fix this in https://github.com/telotortium/org-mode
> > > (branch org-clock-table-extend-today-until-block). I've submitted a
> > > copyright assignment with the FSF.

> > I confirm your copyright assignment is okay.

> > Can you send a patch against Org's current master branch?

> > Thanks!

> > --
> >   Bastien



> --
> Robert Irelan
> rire...@gmail.com



-- 
Robert Irelan
rire...@gmail.com



Re: [O] Does :block field of clocktable respect org-extend-today-until?

2018-05-01 Thread Robert Irelan
I've updated my repo at https://github.com/telotortium/org-mode (branch
org-clock-table-extend-today-until-block). (I know I cloned it from an older
org-mode repo on Github, but I've updated it so that my branch is rebased
onto
the current master.) I hope that'll work.
On Tue, May 1, 2018 at 1:11 AM Bastien <b...@gnu.org> wrote:

> Hi Robert,

> Robert Irelan <rire...@gmail.com> writes:

> > I have a patch to fix this in https://github.com/telotortium/org-mode
> > (branch org-clock-table-extend-today-until-block). I've submitted a
> > copyright assignment with the FSF.

> I confirm your copyright assignment is okay.

> Can you send a patch against Org's current master branch?

> Thanks!

> --
>   Bastien



-- 
Robert Irelan
rire...@gmail.com



Re: [O] Does :block field of clocktable respect org-extend-today-until?

2018-04-30 Thread Robert Irelan
I have a patch to fix this in https://github.com/telotortium/org-mode
(branch org-clock-table-extend-today-until-block). I've submitted a
copyright assignment with the FSF.

On Tue, Apr 17, 2018 at 5:54 AM Nicolas Goaziou <m...@nicolasgoaziou.fr>
wrote:

> Hello,

> Robert Irelan <rire...@gmail.com> writes:

> > Testing it just now, it appears that it doesn't - the clock table
excludes
> > times after midnight but before org-extend-today-until. I'll probably
work
> > on fixing this unless someone believes that the current version of
org-mode
> > is expected to respect org-extend-today-until. org-version gives:
> > Org mode version 9.1.9 (9.1.9-8-gf05c2e-elpaplus)

> As its docstring states:

>   IMPORTANT:  This is a feature whose implementation is and likely will
>   remain incomplete.

> IOW, nothing in Org is really expected to respect
> `org-extend-today-until'. Patches welcome, of course.

> Regards,

> --
> Nicolas Goaziou



--
Robert Irelan
rire...@gmail.com



[O] Does :block field of clocktable respect org-extend-today-until?

2018-04-16 Thread Robert Irelan
Testing it just now, it appears that it doesn't - the clock table excludes
times after midnight but before org-extend-today-until. I'll probably work
on fixing this unless someone believes that the current version of org-mode
is expected to respect org-extend-today-until. org-version gives:
Org mode version 9.1.9 (9.1.9-8-gf05c2e-elpaplus)



Re: [O] Bug: org-capture files wrong date in capture template [9.1.7 (9.1.7-elpaplus @ /Users/rmirelan/.emacs.d/elpa/org-plus-contrib-20180226/)]

2018-04-09 Thread Robert Irelan
Hi, that ended up being the problem. Specifically, the line at
https://code.orgmode.org/bzg/org-mode/src/442e7a2911e3e0229b1b6dd1fe0449653274ec31/lisp/org-capture.el#L1013
needs to be fixed to read instead

(append `(0 0 ,org-extend-today-until)

On Sat, Apr 7, 2018 at 2:07 PM Nicolas Goaziou <m...@nicolasgoaziou.fr>
wrote:

> Hello,
>
> Robert Irelan <rire...@gmail.com> writes:
>
> > I have an org-capture template of type file+olp+datetree and :time-prompt
> > t. Whenever I invoke it, it prompts me for a date. If I enter the current
> > date at the prompt, `%u` correctly formats the captured entry with
> today's
> > date. However, if I enter any other date, whether in the future or past,
> > `%u` is formatted with the date 1 day before the date I enter at the
> > prompt. So, for example, if I enter the date "2018-04-01" at the prompt,
> > `%u` is formatted as "[2018-03-31 Sat]". I can consistently reproduce
> this
> > with the following template, and also with version `Org mode version
> 9.1.9
> > (9.1.9-3-gb1a639-elpaplus @
> > /Users/rmirelan/.emacs.d/elpa/org-plus-contrib-20180402/)`.
> >
> > ```
> >   ("D" "Daily Log" entry (file+olp+datetree
> (lambda
> > nil (concat org-directory "/daily-log.org")))
> >"\n* %u Daily log\n:PROPERTIES:\n:Effort:
> > 0:05\n:END:\n*Summary*:%?\n\n*Problem*:\n\n*Insight*:\n\n*Tomorrow*:\n\n"
> > :time-prompt t :tree-type week :clock-in t :clock-resume t)
> > ```
>
> I cannot reproduce it with my configuration and the template above.
> However...
>
> >   org-extend-today-until 4
>
> ... this could be related to the variable above.
>
> Regards,
>
> --
> Nicolas Goaziou
>


Re: [O] Bug: org-agenda-list fails with "wrong-type-argument stringp nil" from org-agenda-skip [8.3.5 (8.3.5-elpaplus @ $HOME/.emacs.d/elpa/org-plus-contrib-20160801/)]

2016-08-05 Thread Robert Irelan
Trying again since it wasn't received the first time.

On Tue, Aug 2, 2016 at 12:02 PM Robert Irelan <rire...@gmail.com> wrote:

> Ever since updating to 20160801, I've encountered the following error
> whenever trying to run org-agenda-list:
>
> Debugger entered--Lisp error: (wrong-type-argument stringp nil)
>   looking-at(nil)
>   org-agenda-skip()
>   org-agenda-get-deadlines()
>   org-agenda-get-day-entries("/path/to/todo.org" (8 2 2016)
> :deadline :scheduled :timestamp :sexp)
>   apply(org-agenda-get-day-entries "/path/to/todo.org" (8 2 2016)
> (:deadline :scheduled :timestamp :sexp))
>   org-agenda-list(nil)
>   funcall-interactively(org-agenda-list nil)
>   call-interactively(org-agenda-list record nil)
>   command-execute(org-agenda-list record)
>   helm-M-x(nil "org-agenda-list")
>   funcall-interactively(helm-M-x nil "org-agenda-list")
>   call-interactively(helm-M-x nil nil)
>   command-execute(helm-M-x)
>
>
>
> Emacs  : GNU Emacs 25.1.1 (x86_64-pc-linux-gnu, GTK+ Version 3.10.8),
> modified by Debian
> Package: Org-mode version 8.3.5 (8.3.5-elpaplus @
> $HOME/.emacs.d/elpa/org-plus-contrib-20160801/)
>
> current state:
> ==
> (setq
>  org-tab-first-hook '(org-hide-block-toggle-maybe
> org-babel-hide-result-toggle-maybe org-babel-header-arg-expand)
>  org-speed-command-hook '(org-speed-command-default-hook
> org-babel-speed-command-hook)
>  org-occur-hook '(org-first-headline-recenter)
>  org-clock-in-prepare-hook '(my-org-mode-ask-effort)
>  org-metaup-hook '(org-babel-load-in-session-maybe)
>  org-agenda-start-on-weekday nil
>  org-confirm-shell-link-function 'yes-or-no-p
>  org-columns-default-format "%60ITEM(Task) %10Effort(Effort){:}
> %10CLOCKSUM %10CLOCKSUM_T"
>  org-clock-idle-time 15
>  org-startup-folded nil
>  org-list-allow-alphabetical t
>  org-pretty-entities t
>  org-agenda-todo-ignore-scheduled 'future
>  org-agenda-skip-scheduled-if-done t
>  org-agenda-custom-commands '(("n" "Agenda and all TODOs" ((agenda "")
> (alltodo)))
>   ("u" "Unscheduled TODOs" todo ""
>((org-agenda-skip-function
>  (quote (org-agenda-skip-entry-if
> (quote scheduled) (quote deadline) (quote regexp) "\n]+>")))
> (org-agenda-overriding-header
> "Unscheduled TODO entries: "))
>)
>   ("Q" . "Custom queries")
>   ("Q/" "Archive occur"
>(lambda (unused)
> (let*
>  ((tmp (if (boundp
> org-agenda-text-search-extra-files) org-agenda-text-search-extra-files
> (quote nil)))
>   (org-agenda-text-search-extra-files
> (cons (quote agenda-archives) tmp)))
>  (call-interactively (quote
> org-occur-in-agenda-files)))
> )
>"")
>   )
>  org-use-sub-superscripts '{}
>  org-todo-keyword-faces '(("TODO" :foreground "red" :weight bold)
> ("NEXT" :foreground "blue" :weight bold)
>   ("DONE" :foreground "forest green" :weight
> bold) ("WAITING" :foreground "orange" :weight bold)
>   ("HOLD" :foreground "magenta" :weight bold)
> ("CANCELLED" :foreground "forest green" :weight bold)
>   ("MEETING" :foreground "forest green"
> :weight bold) ("PHONE" :foreground "forest green" :weight bold))
>  org-after-todo-state-change-hook '(org-clock-out-if-current)
>  org-clock-x11idle-program-name "/usr/bin/xprintidle"
>  org-from-is-user-regexp "\\"
>  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-global-properties '(("Effort_ALL" . "0:15 0:30 0:45 1:00 2:00
> 3:00 4:00 5:00 6:00 8:00") ("SYTLE_ALL" . "habit"))
>  org-mode-hook '(#[nil "\300\301\302\303\304$\207" [org-add-hook
> change-major-mode-hook org-show-block-all append local] 5]
&g

[O] Bug: org-agenda-list fails with "wrong-type-argument stringp nil" from org-agenda-skip [8.3.5 (8.3.5-elpaplus @ $HOME/.emacs.d/elpa/org-plus-contrib-20160801/)]

2016-08-05 Thread Robert Irelan
Ever since updating to 20160801, I've encountered the following error
whenever trying to run org-agenda-list:

Debugger entered--Lisp error: (wrong-type-argument stringp nil)
  looking-at(nil)
  org-agenda-skip()
  org-agenda-get-deadlines()
  org-agenda-get-day-entries("/path/to/todo.org" (8 2 2016)
:deadline :scheduled :timestamp :sexp)
  apply(org-agenda-get-day-entries "/path/to/todo.org" (8 2 2016)
(:deadline :scheduled :timestamp :sexp))
  org-agenda-list(nil)
  funcall-interactively(org-agenda-list nil)
  call-interactively(org-agenda-list record nil)
  command-execute(org-agenda-list record)
  helm-M-x(nil "org-agenda-list")
  funcall-interactively(helm-M-x nil "org-agenda-list")
  call-interactively(helm-M-x nil nil)
  command-execute(helm-M-x)



Emacs  : GNU Emacs 25.1.1 (x86_64-pc-linux-gnu, GTK+ Version 3.10.8),
modified by Debian
Package: Org-mode version 8.3.5 (8.3.5-elpaplus @
$HOME/.emacs.d/elpa/org-plus-contrib-20160801/)

current state:
==
(setq
 org-tab-first-hook '(org-hide-block-toggle-maybe
org-babel-hide-result-toggle-maybe org-babel-header-arg-expand)
 org-speed-command-hook '(org-speed-command-default-hook
org-babel-speed-command-hook)
 org-occur-hook '(org-first-headline-recenter)
 org-clock-in-prepare-hook '(my-org-mode-ask-effort)
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-agenda-start-on-weekday nil
 org-confirm-shell-link-function 'yes-or-no-p
 org-columns-default-format "%60ITEM(Task) %10Effort(Effort){:}
%10CLOCKSUM %10CLOCKSUM_T"
 org-clock-idle-time 15
 org-startup-folded nil
 org-list-allow-alphabetical t
 org-pretty-entities t
 org-agenda-todo-ignore-scheduled 'future
 org-agenda-skip-scheduled-if-done t
 org-agenda-custom-commands '(("n" "Agenda and all TODOs" ((agenda "")
(alltodo)))
  ("u" "Unscheduled TODOs" todo ""
   ((org-agenda-skip-function
 (quote (org-agenda-skip-entry-if
(quote scheduled) (quote deadline) (quote regexp) "\n]+>")))
(org-agenda-overriding-header
"Unscheduled TODO entries: "))
   )
  ("Q" . "Custom queries")
  ("Q/" "Archive occur"
   (lambda (unused)
(let*
 ((tmp (if (boundp
org-agenda-text-search-extra-files) org-agenda-text-search-extra-files
(quote nil)))
  (org-agenda-text-search-extra-files
(cons (quote agenda-archives) tmp)))
 (call-interactively (quote
org-occur-in-agenda-files)))
)
   "")
  )
 org-use-sub-superscripts '{}
 org-todo-keyword-faces '(("TODO" :foreground "red" :weight bold)
("NEXT" :foreground "blue" :weight bold)
  ("DONE" :foreground "forest green" :weight
bold) ("WAITING" :foreground "orange" :weight bold)
  ("HOLD" :foreground "magenta" :weight bold)
("CANCELLED" :foreground "forest green" :weight bold)
  ("MEETING" :foreground "forest green"
:weight bold) ("PHONE" :foreground "forest green" :weight bold))
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-clock-x11idle-program-name "/usr/bin/xprintidle"
 org-from-is-user-regexp "\\"
 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-global-properties '(("Effort_ALL" . "0:15 0:30 0:45 1:00 2:00
3:00 4:00 5:00 6:00 8:00") ("SYTLE_ALL" . "habit"))
 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-eldoc-load)
 org-refile-targets '((nil :maxlevel . 9) (org-agenda-files :maxlevel . 9))
 org-outline-path-complete-in-steps nil
 org-todo-state-tags-triggers '(("CANCELLED" ("CANCELLED" . t))
("WAITING" ("WAITING" . t)) ("HOLD" ("WAITING") ("HOLD" . t))
(done ("WAITING") ("HOLD")) ("TODO"
("WAITING") ("CANCELLED") ("HOLD"))
("NEXT" ("WAITING") ("CANCELLED")
("HOLD")) ("DONE" ("WAITING") ("CANCELLED") ("HOLD")))
 org-archive-hook '(org-attach-archive-delete-maybe)
 org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point
org-babel-execute-safely-maybe)
 org-refile-use-outline-path t
 org-cycle-hook '(org-cycle-hide-archived-subtrees
org-cycle-hide-drawers org-cycle-show-empty-lines