Work with proposed updates to julia-mode LaTeX completion

JuliaEditorSupport/julia-emacs#100 changes
LaTeX completion in julia-mode to work by a combination of
completion-at-point-function and abbrev-mode. This is the necessary
change to give full-featured LaTeX completion with emacs-jupyter julia
buffers with the PR in its current form.

Author: non-Jedi

jupyter-julia.el

@@ -29,17 +29,22 @@
 (eval-when-compile (require 'subr-x))
 (require 'jupyter-repl)
 
-(declare-function julia-latexsub-or-indent "ext:julia-mode" (arg))
-
-(cl-defmethod jupyter-indent-line (&context (major-mode julia-mode))
-  "Call `julia-latexsub-or-indent'."
-  (call-interactively #'julia-latexsub-or-indent))
+(declare-function julia-mode-latexsub-completion-at-point-before
+                  "ext:julia-mode" ())
+(declare-function julia-mode-latexsub-completion-at-point-around
+                  "ext:julia-mode" ())
+(defvar julia-latexsub-abbrev-table)
+(defvar julia-force-tab-complete)
 
 (cl-defmethod jupyter-load-file-code (file &context (jupyter-lang julia))
   (format "include(\"%s\");" file))
 
 ;;; Completion
 
+(define-abbrev-table 'jupyter-julia-abbrev-table ()
+  "Abbrev table for IJulia kernel with jupyter."
+  :parents (list julia-latexsub-abbrev-table))
+
 (cl-defmethod jupyter-completion-prefix (&context (jupyter-lang julia))
   (cond
    ;; Completing argument lists
@@ -68,18 +73,6 @@
                    (not (memq (char-syntax (char-before (1- beg))) '(?w ?_))))
               (setcar prefix (concat ":" (car prefix))))))))))))
 
-(cl-defmethod jupyter-completion-post-completion (candidate
-                                                  &context (jupyter-lang julia))
-  "Insert the unicode representation of a LaTeX completion."
-  (if (eq (aref candidate 0) ?\\)
-      (when (get-text-property 0 'annot candidate)
-        (search-backward candidate)
-        (delete-region (point) (match-end 0))
-        ;; Alternatively use `julia-latexsub-or-indent', but I have found
-        ;; problems with that.
-        (insert (string-trim (get-text-property 0 'annot candidate))))
-    (cl-call-next-method)))
-
 ;;; `markdown-mode'
 
 (cl-defmethod jupyter-markdown-follow-link (link-text url _ref-label _title-text _bang
@@ -207,7 +200,15 @@ if !isdefined(Main, :__JUPY_saved_dir)
         IJulia.push_posterror_hook(popdir)
         IJulia.push_postexecute_hook(popdir)
     end
-end")))
+end"))
+  (add-hook 'completion-at-point-functions
+            #'julia-mode-latexsub-completion-at-point-before nil t)
+  (add-hook 'completion-at-point-functions
+            #'julia-mode-latexsub-completion-at-point-around nil t)
+  (setq local-abbrev-table jupyter-julia-abbrev-table)
+  (when julia-force-tab-complete
+    (setq-local tab-always-indent 'complete)
+    (abbrev-mode 1)))
 
 (cl-defmethod jupyter-repl-after-init (&context (jupyter-lang julia))
   (add-function