From 8e9a8fe0907fdd56e46bd78bbfb2d05b9eea0c85 Mon Sep 17 00:00:00 2001
From: Adam Porter <adam@alphapapa.net>
Date: Wed, 3 Jan 2024 18:26:03 -0600
Subject: [PATCH] Fix: (org-ql-find) Widen buffer

This fixes the case in which a user calls org-ql-find from a narrowed
buffer and chooses a result outside the restriction.  This is already
done in, e.g. org-ql-open-link; it's just an oversight here.
---
 README.org     |  4 ++-
 org-ql-find.el |  4 +--
 org-ql.info    | 75 ++++++++++++++++++++++++++------------------------
 3 files changed, 44 insertions(+), 39 deletions(-)

diff --git a/README.org b/README.org
index 20b13c5..178ca4f 100644
--- a/README.org
+++ b/README.org
@@ -555,7 +555,9 @@ Simple links may also be written manually in either sexp or non-sexp form, like:
 
 ** 0.8.1-pre
 
-Nothing new yet.
+*Fixes*
+
++ Command ~org-ql-find~ widens the buffer before going to the selected entry.
 
 ** 0.8
 
diff --git a/org-ql-find.el b/org-ql-find.el
index e4b16a6..fed9ade 100644
--- a/org-ql-find.el
+++ b/org-ql-find.el
@@ -77,8 +77,8 @@ single predicate)."
                   :prompt prompt)))
     (set-buffer (marker-buffer marker))
     (pop-to-buffer (current-buffer) org-ql-find-display-buffer-action)
-    (goto-char marker)
-    (run-hook-with-args 'org-ql-find-goto-hook)))
+    (org-with-point-at marker
+      (run-hook-with-args 'org-ql-find-goto-hook))))
 
 ;;;###autoload
 (defun org-ql-refile (marker)
diff --git a/org-ql.info b/org-ql.info
index e88fde6..630d120 100644
--- a/org-ql.info
+++ b/org-ql.info
@@ -1068,7 +1068,10 @@ File: README.info,  Node: 081-pre,  Next: 08,  Up: Changelog
 5.1 0.8.1-pre
 =============
 
-Nothing new yet.
+*Fixes*
+
+   • Command ‘org-ql-find’ widens the buffer before going to the
+     selected entry.
 
 
 File: README.info,  Node: 08,  Next: 074,  Prev: 081-pre,  Up: Changelog
@@ -1916,41 +1919,41 @@ Node: Links38827
 Node: Tips39514
 Node: Changelog39838
 Node: 081-pre40676
-Node: 0840787
-Node: 07443515
-Node: 07343738
-Node: 07244470
-Node: 07145389
-Node: 0746198
-Node: 06349122
-Node: 06249653
-Node: 06149958
-Node: 0650528
-Node: 05253584
-Node: 05153886
-Node: 0554311
-Node: 04955842
-Node: 04856124
-Node: 04756473
-Node: 04656882
-Node: 04557290
-Node: 04457651
-Node: 04358010
-Node: 04258213
-Node: 04158374
-Node: 0458621
-Node: 03262722
-Node: 03163125
-Node: 0363322
-Node: 02366622
-Node: 02266856
-Node: 02167136
-Node: 0267341
-Node: 0171419
-Node: Notes71520
-Node: Comparison with Org Agenda searches71682
-Node: org-sidebar72571
-Node: License72850
+Node: 0840871
+Node: 07443599
+Node: 07343822
+Node: 07244554
+Node: 07145473
+Node: 0746282
+Node: 06349206
+Node: 06249737
+Node: 06150042
+Node: 0650612
+Node: 05253668
+Node: 05153970
+Node: 0554395
+Node: 04955926
+Node: 04856208
+Node: 04756557
+Node: 04656966
+Node: 04557374
+Node: 04457735
+Node: 04358094
+Node: 04258297
+Node: 04158458
+Node: 0458705
+Node: 03262806
+Node: 03163209
+Node: 0363406
+Node: 02366706
+Node: 02266940
+Node: 02167220
+Node: 0267425
+Node: 0171503
+Node: Notes71604
+Node: Comparison with Org Agenda searches71766
+Node: org-sidebar72655
+Node: License72934
 
 End Tag Table