Fix fricas capfs
This commit is contained in:
parent
6ad6ebbdcb
commit
1d68bc3e24
13
init.el
13
init.el
@ -943,6 +943,18 @@ argument."
|
|||||||
(add-to-list 'load-path "/usr/lib/fricas/emacs/")
|
(add-to-list 'load-path "/usr/lib/fricas/emacs/")
|
||||||
(use-package fricas
|
(use-package fricas
|
||||||
:ensure nil
|
:ensure nil
|
||||||
|
:custom
|
||||||
|
(fricas-run-command "fricas -nosman")
|
||||||
|
:init
|
||||||
|
;; Fix `fricas-mode' messing up `completion-at-point-functions'
|
||||||
|
(advice-add #'fricas-mode :around
|
||||||
|
#'(lambda (oldfun &rest r)
|
||||||
|
(let ((temp-capfs))
|
||||||
|
(let ((completion-at-point-functions '(t)))
|
||||||
|
(apply oldfun r)
|
||||||
|
(setq temp-capfs completion-at-point-functions))
|
||||||
|
(setq-local completion-at-point-functions temp-capfs)))
|
||||||
|
'((name . "my/-fricas-fix-capfs")))
|
||||||
:config
|
:config
|
||||||
(face-spec-set 'fricas-type-time '((t (:foreground nil
|
(face-spec-set 'fricas-type-time '((t (:foreground nil
|
||||||
:background nil
|
:background nil
|
||||||
@ -955,6 +967,7 @@ argument."
|
|||||||
:inherit nerd-icons-lblue))))
|
:inherit nerd-icons-lblue))))
|
||||||
(face-spec-set 'fricas-algebra '((t (:foreground nil
|
(face-spec-set 'fricas-algebra '((t (:foreground nil
|
||||||
:background nil
|
:background nil
|
||||||
|
:weight bold
|
||||||
:inherit fricas-prompt))))
|
:inherit fricas-prompt))))
|
||||||
(face-spec-set 'fricas-TeX '((t (:foreground nil
|
(face-spec-set 'fricas-TeX '((t (:foreground nil
|
||||||
:background nil
|
:background nil
|
||||||
|
Loading…
Reference in New Issue
Block a user