summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2018-07-05 13:17:02 +0200
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2018-10-03 18:44:34 +0200
commitbfd481be42bb46ff2a496c018093404b2485c3b0 (patch)
treec17daf989e99d14f4f7d2bb1626cda8e49867a12
parent144c27e39d61eb11058c556781e6be3fd31ff199 (diff)
downloadorg-mode-bfd481be42bb46ff2a496c018093404b2485c3b0.tar.gz
ob-core: Remove `org-babel-set-current-result-hash'
* lisp/ob-core.el (org-babel-set-current-result-hash): Remove function, unused through the code base.
-rw-r--r--etc/ORG-NEWS5
-rw-r--r--lisp/ob-core.el13
2 files changed, 5 insertions, 13 deletions
diff --git a/etc/ORG-NEWS b/etc/ORG-NEWS
index fee8daf..dbe3c13 100644
--- a/etc/ORG-NEWS
+++ b/etc/ORG-NEWS
@@ -50,6 +50,11 @@ the corresponding direction by swapping with the adjacent cell.
*** ~org-table-cell-down~
*** ~org-table-cell-left~
*** ~org-table-cell-right~
+** Removed functions
+*** ~org-babel-set-current-result-hash~
+
+It was unused throughout the code base.
+
* Version 9.2
** Incompatible changes
*** Removal of OrgStruct mode mode and radio lists
diff --git a/lisp/ob-core.el b/lisp/ob-core.el
index 32de18e..5a902d2 100644
--- a/lisp/ob-core.el
+++ b/lisp/ob-core.el
@@ -1291,19 +1291,6 @@ CONTEXT specifies the context of evaluation. It can be `:eval',
(looking-at org-babel-result-regexp)
(match-string-no-properties 1)))))
-(defun org-babel-set-current-result-hash (hash info)
- "Set the current in-buffer hash to HASH."
- (org-with-wide-buffer
- (goto-char (org-babel-where-is-src-block-result nil info))
- (looking-at org-babel-result-regexp)
- (goto-char (match-beginning 1))
- (mapc #'delete-overlay (overlays-at (point)))
- (forward-char org-babel-hash-show)
- (mapc #'delete-overlay (overlays-at (point)))
- (replace-match hash nil nil nil 1)
- (beginning-of-line)
- (org-babel-hide-hash)))
-
(defun org-babel-hide-hash ()
"Hide the hash in the current results line.
Only the initial `org-babel-hash-show' characters of the hash