branch: externals/gnorb
commit 4a732d9086742ba0de3238ca9afc676b5a725b2a
Author: Eric Abrahamsen <[email protected]>
Commit: Stefan Monnier <[email protected]>
Tweak text search in gnorb-org-view
* packages/gnorb/nngnorb.el (nnir-run-gnorb): God knows why, but the
original location of this clause once or twice gave me an "args out
of range", possibly due to funky narrowing. Moving it to this spot
seems bound to avoid an error, and should give the same result.
---
nngnorb.el | 9 ++++-----
1 file changed, 4 insertions(+), 5 deletions(-)
diff --git a/nngnorb.el b/nngnorb.el
index f706883..dd6e23e 100644
--- a/nngnorb.el
+++ b/nngnorb.el
@@ -87,13 +87,12 @@ be scanned for gnus messages, and those messages displayed."
(cond ((string-match "id\\+\\([[:alnum:]-]+\\)$" q)
(with-demoted-errors "Error: %S"
(org-id-goto (match-string 1 q))
- (append-to-buffer
- buf
- (point)
- (org-element-property
- :end (org-element-at-point)))
(save-restriction
(org-narrow-to-subtree)
+ (append-to-buffer
+ buf
+ (point-min)
+ (point-max))
(setq org-ids
(append
(gnorb-collect-ids)
