branch: externals/org-remark
commit ace9570070038918bef8ab6525d3b4f556d5d37b
Author: Noboru Ota <m...@nobiot.com>
Commit: Noboru Ota <m...@nobiot.com>
refactor: simply org-remark-open
---
org-remark.el | 7 +++----
1 file changed, 3 insertions(+), 4 deletions(-)
diff --git a/org-remark.el b/org-remark.el
index 57515240e0..cd61425c08 100644
--- a/org-remark.el
+++ b/org-remark.el
@@ -549,13 +549,12 @@ notes file by tracking it."
;; Somehow recenter is needed when a highlight is deleted and move to a
;; previous highlight. Otherwise, the cursor is too low to show the
;; entire entry. It looks like there is no entry.
- (goto-char p)(org-narrow-to-subtree)(org-end-of-meta-data t)(recenter))
+ (goto-char p) (org-narrow-to-subtree) (org-end-of-meta-data t)
(recenter))
;; Run hook with the current-buffer being the note's buffer
(run-hooks 'org-remark-open-hook)
;; Avoid error when buffer-action is set to display a new frame
- (when-let ((view-only view-only)
- (window (get-buffer-window cbuf)))
- (select-window window))))
+ (when view-only
+ (select-window (get-buffer-window cbuf)))))
(defun org-remark-view (point)
"View marginal notes for highlight at POINT.
