[elpa] externals/org-remark a6b79194d8 4/4: fix: remove text functions and hook

[ELPA Syncer]

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

    fix: remove text functions and hook
    
    The following functions are meant to be experiementation only. Removed
    to update GitHub repo.
    
    org-remark-notes-send-data
    org-remark-notes-communicate-with-source
---
 README.org    | 24 ------------------------
 org-remark.el | 27 ---------------------------
 2 files changed, 51 deletions(-)

diff --git a/README.org b/README.org
index d3007e03b7..e653ebf66c 100644
--- a/README.org
+++ b/README.org
@@ -117,32 +117,8 @@ This macro was inspired by 
[[https://github.com/jkitchin/ov-highlight][Ov-highli
 :END:
 
 ** org-remark-notes-send-data
-:PROPERTIES:
-:org-remark-beg: 39905
-:org-remark-end: 39931
-:org-remark-id: 4de1f10c
-:org-remark-label: nil
-:org-remark-link: [[file:org-remark.el::989]]
-:org-remark-note-body: [empty entry]
-:END:
 
 ** org-remark-highlights-load
-:PROPERTIES:
-:org-remark-beg: 40022
-:org-remark-end: 40048
-:org-remark-id: bf05b18c
-:org-remark-label: nil
-:org-remark-link: [[file:org-remark.el::993]]
-:org-remark-note-body: [empty entry]
-:END:
 
 ** goto
-:PROPERTIES:
-:org-remark-beg: 34151
-:org-remark-end: 34155
-:org-remark-id: 184667c4
-:org-remark-label: nil
-:org-remark-link: [[file:org-remark.el::856]]
-:org-remark-note-body: This is no longer empty.
-:END:
 This is no longer empty.
diff --git a/org-remark.el b/org-remark.el
index bb2e37c39d..1b624257ef 100644
--- a/org-remark.el
+++ b/org-remark.el
@@ -716,33 +716,10 @@ to the database."
              (overlay-put ov 'help-echo (plist-get notes-props :body)))
            (overlay-put ov 'org-remark-note-body
                         (plist-get notes-props :body)))))))
-  ;;; for on-going communication from notes to source, after-save-hook.
-  (let ((notes-buf (find-file-noselect (org-remark-notes-get-file-name))))
-    (with-current-buffer notes-buf
-        ;;; think of the case when source = notes files?
-      (add-hook 'after-save-hook #'org-remark-notes-send-data nil :local)))
   (deactivate-mark)
   (org-remark-highlights-housekeep)
   (org-remark-highlights-sort))
 
-(defun org-remark-notes-communicate-with-source (filename id)
-  "Send data for the marginal notes for ID.
-Assume the current buffer is the source buffer."
-  ;;; Add local hook to the notes buffer so that it can communicate data
-  ;;; to the source buffer upon save.
-  (let ((notes-buf (find-file-noselect (org-remark-notes-get-file-name))))
-    (with-current-buffer notes-buf
-      ;;; on load, send data once
-      (org-with-wide-buffer
-       ;;; File must exist already; this is not to create
-       (let ((file-headline (org-find-property
-                             org-remark-prop-source-file
-                             (org-remark-source-get-file-name filename)))
-             (id-headline (org-find-property org-remark-prop-id id)))
-         (goto-char file-headline)
-         (goto-char id-headline)
-         (message (concat "text" (org-remark-highlight-get-text))))))))
-
 (defun org-remark-highlight-get-title ()
   "Return the title of the current buffer.
 Utility function to work with a single highlight overlay."
@@ -986,10 +963,6 @@ drawer."
 ;;;;; org-remark-highlights
 ;;    Work on all the highlights in the current buffer
 
-(defun org-remark-notes-send-data ()
-  ;; TODO.  Think of the case when source = notes files
-  (message "Sending"))
-
 (defun org-remark-highlights-load ()
   "Visit `org-remark-notes-file' & load the saved highlights onto current 
buffer.
 If there is no highlights or annotations for current buffer,