aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2019-01-06 07:14:03 +0000
committerSean Whitton <spwhitton@spwhitton.name>2019-01-06 07:49:29 +0000
commit758a6745c75a92cf37695dd51a3662ff87ef3c05 (patch)
treed9a0d1006401bba614599a439e18052b4bc998e3
parent8deccf283d01b28ef4191c73783509efb957bc3b (diff)
downloadorg-d20-758a6745c75a92cf37695dd51a3662ff87ef3c05.tar.gz
rename a private function
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
-rw-r--r--org-d20.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/org-d20.el b/org-d20.el
index ff2e956..a7d6e56 100644
--- a/org-d20.el
+++ b/org-d20.el
@@ -252,19 +252,19 @@ the best N of them, e.g., 4d6k3."
(progn
(org-table-goto-column 2)
(insert "~")
- (org-table-end-of-current-cell-content)
+ (spw-d20--org-table-end-of-current-cell-content)
(insert "~"))
(when (>= total-damage (/ max-hp 2))
(org-table-goto-column 7)
- (org-table-end-of-current-cell-content)
+ (spw-d20--org-table-end-of-current-cell-content)
(unless (looking-back "bloodied")
(unless (looking-back "|")
(insert "; "))
(insert "bloodied")))))))))
(org-table-align)))
-(defun org-table-end-of-current-cell-content ()
- (interactive)
+(defun org-d20--org-table-end-of-current-cell-content ()
+ "Move point to the end of the content of the current Org table cell."
(search-forward "|" (save-excursion (end-of-line) (point)))
(forward-char -2)
(skip-chars-backward " "))