浏览代码

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.
Nicolas Goaziou 6 年之前
父节点
当前提交
bfd481be42
共有 2 个文件被更改,包括 5 次插入13 次删除
  1. 5 0
      etc/ORG-NEWS
  2. 0 13
      lisp/ob-core.el

+ 5 - 0
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

+ 0 - 13
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