Fix org mu4e stuff
This commit is contained in:
43
init.el
43
init.el
@ -2338,28 +2338,29 @@ Note that this erases the buffer before doing anything."
|
||||
retval)))
|
||||
(advice-add 'jupyter-kernel-language-mode-properties
|
||||
:filter-return #'my/-jupyter-dont-use-ts-modes)
|
||||
|
||||
(with-eval-after-load 'jupyter-org-client
|
||||
;; fix some bugs
|
||||
(defun my/-fix-jupyter-org--set-src-block-cache (oldfun)
|
||||
(unless jupyter-org--src-block-cache
|
||||
(setq jupyter-org--src-block-cache
|
||||
(list 'invalid nil (make-marker)
|
||||
(let ((end (make-marker)))
|
||||
;; Move the end marker when text is inserted
|
||||
(set-marker-insertion-type end t)
|
||||
end))))
|
||||
(funcall oldfun))
|
||||
(advice-add 'jupyter-org--set-src-block-cache :around
|
||||
#'my/-fix-jupyter-org--set-src-block-cache)
|
||||
|
||||
;; prevent warning in `execute-extended-command'
|
||||
(defun my/-fix-jupyter-org--define-key-filter (oldfun &rest args)
|
||||
"Prevent calling `jupyter-org--define-key-filter' outside of `org-mode'."
|
||||
(when (derived-mode-p 'org-mode)
|
||||
(apply oldfun args)))
|
||||
(advice-add 'jupyter-org--define-key-filter :around
|
||||
#'my/-fix-jupyter-org--define-key-filter))
|
||||
:config
|
||||
;; fix some bugs
|
||||
(defun my/-fix-jupyter-org--set-src-block-cache (oldfun)
|
||||
(unless jupyter-org--src-block-cache
|
||||
(setq jupyter-org--src-block-cache
|
||||
(list 'invalid nil (make-marker)
|
||||
(let ((end (make-marker)))
|
||||
;; Move the end marker when text is inserted
|
||||
(set-marker-insertion-type end t)
|
||||
end))))
|
||||
(funcall oldfun))
|
||||
(advice-add 'jupyter-org--set-src-block-cache :around
|
||||
#'my/-fix-jupyter-org--set-src-block-cache)
|
||||
|
||||
;; prevent warning in `execute-extended-command'
|
||||
(defun my/-fix-jupyter-org--define-key-filter (oldfun &rest args)
|
||||
"Prevent calling `jupyter-org--define-key-filter' outside of `org-mode'."
|
||||
(when (derived-mode-p 'org-mode)
|
||||
(apply oldfun args)))
|
||||
(advice-add 'jupyter-org--define-key-filter :around
|
||||
#'my/-fix-jupyter-org--define-key-filter)
|
||||
|
||||
(face-spec-set 'jupyter-repl-traceback
|
||||
'((default . (:background unspecified)))
|
||||
'face-override-spec)
|
||||
|
||||
Reference in New Issue
Block a user