* Bug: org-map-drill-entries fails in org-tags-expand on empty string
@ 2019-01-23 19:18 Robert Irelan
2019-02-01 20:16 ` Robert Irelan
2019-02-01 21:50 ` Stig Brautaset
0 siblings, 2 replies; 3+ messages in thread
From: Robert Irelan @ 2019-01-23 19:18 UTC (permalink / raw)
To: Org-mode
[-- Attachment #1: Type: text/plain, Size: 23 bytes --]
Patch to fix attached.
[-- Attachment #2: 0001-org-drill-Fix-tag-match-in-org-map-drill-entries.patch --]
[-- Type: text/x-patch, Size: 1116 bytes --]
From a3af9004fbc5a8a86ba8f990d393403ec671f9bf Mon Sep 17 00:00:00 2001
From: Robert Irelan <rmirelan@google.com>
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
^ permalink raw reply related [flat|nested] 3+ messages in thread
* Re: Bug: org-map-drill-entries fails in org-tags-expand on empty string
2019-01-23 19:18 Bug: org-map-drill-entries fails in org-tags-expand on empty string Robert Irelan
@ 2019-02-01 20:16 ` Robert Irelan
2019-02-01 21:50 ` Stig Brautaset
1 sibling, 0 replies; 3+ messages in thread
From: Robert Irelan @ 2019-02-01 20:16 UTC (permalink / raw)
To: Org-mode
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 <rirelan@gmail.com> wrote:
>
> Patch to fix attached.
--
Robert Irelan
rirelan@gmail.com
^ permalink raw reply [flat|nested] 3+ messages in thread
* Re: Bug: org-map-drill-entries fails in org-tags-expand on empty string
2019-01-23 19:18 Bug: org-map-drill-entries fails in org-tags-expand on empty string Robert Irelan
2019-02-01 20:16 ` Robert Irelan
@ 2019-02-01 21:50 ` Stig Brautaset
1 sibling, 0 replies; 3+ messages in thread
From: Stig Brautaset @ 2019-02-01 21:50 UTC (permalink / raw)
To: Robert Irelan, Org-mode
Robert Irelan <rirelan@gmail.com> writes:
> Patch to fix attached.
I can confirm that this patch is required to make `org-drill' work for me in Org 9.2
Regards,
Stig
> From a3af9004fbc5a8a86ba8f990d393403ec671f9bf Mon Sep 17 00:00:00 2001
> From: Robert Irelan <rmirelan@google.com>
> 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)))
^ permalink raw reply [flat|nested] 3+ messages in thread
end of thread, other threads:[~2019-02-01 22:06 UTC | newest]
Thread overview: 3+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2019-01-23 19:18 Bug: org-map-drill-entries fails in org-tags-expand on empty string Robert Irelan
2019-02-01 20:16 ` Robert Irelan
2019-02-01 21:50 ` Stig Brautaset
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).