[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org-remark e958e3f068: add org-remark-open-hook #40
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org-remark e958e3f068: add org-remark-open-hook #40 |
Date: |
Sat, 19 Nov 2022 10:58:05 -0500 (EST) |
branch: externals/org-remark
commit e958e3f06819f643edc66cd7ac442044e95c3671
Author: Noboru Ota <me@nobiot.com>
Commit: Noboru Ota <me@nobiot.com>
add org-remark-open-hook #40
---
org-remark.el | 8 +++++++-
1 file changed, 7 insertions(+), 1 deletion(-)
diff --git a/org-remark.el b/org-remark.el
index a970ca165e..a50ce1c866 100644
--- a/org-remark.el
+++ b/org-remark.el
@@ -6,7 +6,7 @@
;; URL: https://github.com/nobiot/org-remark
;; Version: 1.0.5
;; Created: 22 December 2020
-;; Last modified: 18 July 2022
+;; Last modified: 23 August 2022
;; Package-Requires: ((emacs "27.1") (org "9.4"))
;; Keywords: org-mode, annotation, writing, note-taking, marginal-notes
@@ -109,6 +109,10 @@ Org-remark does not create this ID, which needs to be added
manually or some other function to either the headline or file."
:type 'boolean)
+(defcustom org-remark-open-hook nil
+ "Hook run when a note buffer is opened/visited.
+The current buffer is the note buffer."
+ :type 'hook)
;;;; Variables
@@ -429,6 +433,8 @@ notes file by tracking it."
;; 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))
+ ;; 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)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/org-remark e958e3f068: add org-remark-open-hook #40,
ELPA Syncer <=