瀏覽代碼

org-inlinetask: remove unused function

* lisp/org-inlinetask.el (org-inlinetask-get-current-indentation):
  Remove function.

The function was unused throughout the code base.
Nicolas Goaziou 6 年之前
父節點
當前提交
7fcd14945a
共有 1 個文件被更改,包括 0 次插入11 次删除
  1. 0 11
      lisp/org-inlinetask.el

+ 0 - 11
lisp/org-inlinetask.el

@@ -268,17 +268,6 @@ If the task has an end part, also demote it."
 	    (goto-char beg)
 	    (org-fixup-indentation diff)))))))
 
-(defun org-inlinetask-get-current-indentation ()
-  "Get the indentation of the last non-while line above this one."
-  (save-excursion
-    (beginning-of-line 1)
-    (skip-chars-backward " \t\n")
-    (beginning-of-line 1)
-    (or (org-at-item-p)
-	(looking-at "[ \t]*"))
-    (goto-char (match-end 0))
-    (current-column)))
-
 (defvar org-indent-indentation-per-level) ; defined in org-indent.el
 
 (defface org-inlinetask '((t :inherit shadow))