Remove experimental dead code
This commit is contained in:
parent
c5979fb175
commit
f569c9f7be
28
README.org
28
README.org
|
@ -4818,34 +4818,6 @@ the Org-mode source block code before calling `eglot-ensure'."
|
||||||
(eglot-org-babel-edit-prep info)))
|
(eglot-org-babel-edit-prep info)))
|
||||||
#+end_src
|
#+end_src
|
||||||
|
|
||||||
#+caption[Make sessions for "eval-buffer" in "org-src-mode" buffers.]:
|
|
||||||
#+caption: Make sessions for ~eval-buffer~ in ~org-src-mode~ buffers.
|
|
||||||
#+caption: *Experimental: do not tangle*.
|
|
||||||
#+begin_src emacs-lisp -n :results silent :tangle no
|
|
||||||
(with-eval-after-load 'emacs
|
|
||||||
(defun org-babel-edit-prep:python (info)
|
|
||||||
(message "`%S'" info)
|
|
||||||
(let* ((session (cdr (assq :session (nth 2 info))))
|
|
||||||
(muffed (if (member session '("none" ":default")) ;; nil
|
|
||||||
"*Python*"
|
|
||||||
(org-babel-python-with-earmuffs session)))
|
|
||||||
(key (car (rassoc muffed org-babel-python-buffers))))
|
|
||||||
;; (message "obpb is `%S'" org-babel-python-buffers)
|
|
||||||
;; (message "session is `%S', muffed is `%S', key is `%S'"
|
|
||||||
;; session muffed key)
|
|
||||||
(unless (and (get-buffer muffed)
|
|
||||||
(buffer-match-p '(major-mode . inferior-python-mode) muffed)
|
|
||||||
(get-process (org-babel-python-without-earmuffs muffed)))
|
|
||||||
(when (y-or-n-p "Start Python session?")
|
|
||||||
(org-babel-python-initiate-session
|
|
||||||
(if (eq key :default) nil (org-babel-python-without-earmuffs muffed))))
|
|
||||||
;; (message "obpb is `%S'" org-babel-python-buffers)
|
|
||||||
)
|
|
||||||
(setq-local python-shell-buffer-name
|
|
||||||
(org-babel-python-without-earmuffs muffed)))
|
|
||||||
(eglot-org-babel-edit-prep info)))
|
|
||||||
#+end_src
|
|
||||||
|
|
||||||
#+caption[Setup Python =org-src-mode= buffers for =eglot=]:
|
#+caption[Setup Python =org-src-mode= buffers for =eglot=]:
|
||||||
#+caption: Setup Python =org-src-mode= buffers for =eglot=.
|
#+caption: Setup Python =org-src-mode= buffers for =eglot=.
|
||||||
#+name: lst:setup-python-org-src-mode-for-eglot
|
#+name: lst:setup-python-org-src-mode-for-eglot
|
||||||
|
|
Loading…
Reference in New Issue