emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/org-remark ca0c0ac674 080/173: doc: global-tracking doc


From: ELPA Syncer
Subject: [elpa] externals/org-remark ca0c0ac674 080/173: doc: global-tracking docstring
Date: Fri, 28 Jan 2022 16:58:03 -0500 (EST)

branch: externals/org-remark
commit ca0c0ac674f0c231f624ddd18be29c002ece4263
Author: Noboru Ota <me@nobiot.com>
Commit: Noboru Ota <me@nobiot.com>

    doc: global-tracking docstring
---
 org-marginalia-global-tracking.el | 19 ++++++++++++++-----
 1 file changed, 14 insertions(+), 5 deletions(-)

diff --git a/org-marginalia-global-tracking.el 
b/org-marginalia-global-tracking.el
index f68a09eb39..1e6808211d 100644
--- a/org-marginalia-global-tracking.el
+++ b/org-marginalia-global-tracking.el
@@ -46,8 +46,13 @@ activates `org-marginalia-mode' locally for the file opened."
     (remove-hook 'find-file-hook #'org-marginalia-tracking-auto-on)
     (remove-hook 'kill-emacs-hook #'org-marginalia-tracking-save))))
 
+;;;; Private Functions
+
 (defun org-marginalia-tracking-auto-on ()
-  "."
+  "Activate `org-marginalia-mode' when file is being tracked.
+The files being tracked are loaded on to
+`org-marginalia-files-tracked'.  Refer to
+`org-marginalia-tracking-load'."
   (when (and org-marginalia-files-tracked
             (member (abbreviate-file-name (buffer-file-name))
                     org-marginalia-files-tracked))
@@ -55,9 +60,11 @@ activates `org-marginalia-mode' locally for the file opened."
     (org-marginalia-mode +1)))
 
 (defun org-marginalia-tracking-load ()
-  ".
-Each line.  It loads regardless of `org-marginalia-tracking-file';
-if already loaded this function reloads."
+  "Load files being tracked from `org-marginalia-tracking-file'.
+It has one filename each line (separated by "\n"). The filename
+is obtrained `abbreviated-file-names'.  This function reloads the
+content of the file regardless if it is already done in this
+Emacs session or not."
   (with-temp-buffer
     (condition-case nil
        (progn
@@ -67,7 +74,9 @@ if already loaded this function reloads."
           (setq org-marginalia-tracking-file-loaded t)))))
 
 (defun org-marginalia-tracking-save ()
-  "."
+  "Save files being tracked in `org-marginalia-tracking-file'.
+Files with marginal notes are tracked with variable
+`org-marginalia-files-tracked'."
   (interactive)
   (when org-marginalia-files-tracked
     (with-temp-file org-marginalia-tracking-file



reply via email to

[Prev in Thread] Current Thread [Next in Thread]