branch: elpa/julia-mode
commit 15326d69923ae5fe5a0bb2fffa7a9350346221b7
Author: Adam Beckmeyer <[email protected]>
Commit: Adam Beckmeyer <[email protected]>

    Remove extraneous -mode suffix from julia-- functions
---
 julia-mode-tests.el |  2 +-
 julia-mode.el       | 10 +++++-----
 2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/julia-mode-tests.el b/julia-mode-tests.el
index 45b50097d2..6b5a0e7b62 100644
--- a/julia-mode-tests.el
+++ b/julia-mode-tests.el
@@ -889,7 +889,7 @@ end" 'end-of-defun "n == 0" "return fact(x)[ \n]+end" 'end 
2))
     (julia-mode)
     (insert contents)
     (goto-char position)
-    (cons (julia-mode--latexsub-start-symbol) 
(julia-mode--latexsub-end-symbol))))
+    (cons (julia--latexsub-start-symbol) (julia--latexsub-end-symbol))))
 
 (ert-deftest julia--test-find-latex ()
   (should (equal (julia--find-latex "\\alpha " 7) (cons 1 7)))
diff --git a/julia-mode.el b/julia-mode.el
index 94cf87e7e6..f944dad284 100644
--- a/julia-mode.el
+++ b/julia-mode.el
@@ -808,7 +808,7 @@ strings."
 (define-key julia-mode-map (kbd "<backtab>") 'julia-manual-deindent)
 
 ;; (See Julia issue #8947 for why we don't use the Emacs tex input mode.)
-(defun julia-mode--latexsub-start-symbol ()
+(defun julia--latexsub-start-symbol ()
   "Determine the start location for LaTeX-like symbol at point.
 If there is not a LaTeX-like symbol at point, return nil."
   (save-excursion
@@ -824,7 +824,7 @@ If there is not a LaTeX-like symbol at point, return nil."
     (when (= ?\\ (char-before))
       (- (point) 1))))
 
-(defun julia-mode--latexsub-end-symbol ()
+(defun julia--latexsub-end-symbol ()
   "Determine the end location for LaTeX-like symbol at point."
   (save-excursion
     (while (not (or (eobp)
@@ -836,9 +836,9 @@ If there is not a LaTeX-like symbol at point, return nil."
 (defun julia-mode-latexsub-completion-at-point-around ()
   "Return completion for LaTeX-like symbol around point.
 Suitable for use in `completion-at-point-functions'."
-  (let ((beg (julia-mode--latexsub-start-symbol)))
+  (let ((beg (julia--latexsub-start-symbol)))
     (when beg
-      (list beg (julia-mode--latexsub-end-symbol) julia-mode-latexsubs
+      (list beg (julia--latexsub-end-symbol) julia-mode-latexsubs
             :exclusive 'no
             :annotation-function (lambda (s)
                                    (concat " " (gethash s 
julia-mode-latexsubs)))
@@ -848,7 +848,7 @@ Suitable for use in `completion-at-point-functions'."
 (defun julia-mode-latexsub-completion-at-point-before ()
   "Return completion for LaTeX-like symbol before point.
 Suitable for use in `completion-at-point-functions'."
-  (let ((beg (julia-mode--latexsub-start-symbol)))
+  (let ((beg (julia--latexsub-start-symbol)))
     (when beg
       (list beg (point) julia-mode-latexsubs :exclusive 'no
             :annotation-function (lambda (s)

Reply via email to