[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org b2e34474f5 3/4: org-lint: Allow jumping outside nar
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org b2e34474f5 3/4: org-lint: Allow jumping outside narrowing when jumping to source |
Date: |
Thu, 17 Aug 2023 06:58:17 -0400 (EDT) |
branch: externals/org
commit b2e34474f5930dbe6e5449d3b017b4d7c983af3d
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>
org-lint: Allow jumping outside narrowing when jumping to source
* lisp/org-lint.el (org-lint--jump-to-source): When buffer is
narrowed and the location to jump is outside the narrowing, widen.
---
lisp/org-lint.el | 1 +
1 file changed, 1 insertion(+)
diff --git a/lisp/org-lint.el b/lisp/org-lint.el
index 0e0bbea66d..d0f6994215 100644
--- a/lisp/org-lint.el
+++ b/lisp/org-lint.el
@@ -274,6 +274,7 @@ CHECKERS is the list of checkers used."
(interactive)
(let ((mk (org-lint--current-marker)))
(switch-to-buffer-other-window org-lint--source-buffer)
+ (unless (<= (point-min) mk (point-max)) (widen))
(goto-char mk)
(org-fold-show-set-visibility 'local)
(recenter)))