From f3c0d401de55d7ad8873c18658abd1d9f6b49d77 Mon Sep 17 00:00:00 2001 From: Liu Hui Date: Tue, 5 Dec 2023 11:36:07 +0800 Subject: [PATCH] Remove 'org-src-babel-configure-edit-buffer' and related stuffs The functionality has stopped working since 203bf5870. org-babel-edit-prep:lang should be used instead. * lisp/org-src.el (org-src-associate-babel-session): (org-src-babel-configure-edit-buffer): * lisp/ob-R.el (org-babel-R-associate-session): Remove. --- lisp/ob-R.el | 8 -------- lisp/org-src.el | 23 ----------------------- 2 files changed, 31 deletions(-) diff --git a/lisp/ob-R.el b/lisp/ob-R.el index c48b2cdb7..f3cce20b7 100644 --- a/lisp/ob-R.el +++ b/lisp/ob-R.el @@ -294,14 +294,6 @@ (defun org-babel-R-initiate-session (session params) (buffer-name)))) (current-buffer)))))) -(defun org-babel-R-associate-session (session) - "Associate R code buffer with an R session. -Make SESSION be the inferior ESS process associated with the -current code buffer." - (setq ess-local-process-name - (process-name (get-buffer-process session))) - (ess-make-buffer-current)) - (defvar org-babel-R-graphics-devices '((:bmp "bmp" "filename") (:jpg "jpeg" "filename") diff --git a/lisp/org-src.el b/lisp/org-src.el index 866ff2dbf..6406b8d29 100644 --- a/lisp/org-src.el +++ b/lisp/org-src.el @@ -914,29 +914,6 @@ (defun org-src-mode-configure-edit-buffer () (add-hook 'org-src-mode-hook #'org-src-mode-configure-edit-buffer) - - -;;; Babel related functions - -(defun org-src-associate-babel-session (info) - "Associate edit buffer with comint session. -INFO should be a list similar in format to the return value of -`org-babel-get-src-block-info'." - (interactive) - (let ((session (cdr (assq :session (nth 2 info))))) - (and session (not (string= session "none")) - (org-babel-comint-buffer-livep session) - (let ((f (intern (format "org-babel-%s-associate-session" - (nth 0 info))))) - (and (fboundp f) (funcall f session)))))) - -(defun org-src-babel-configure-edit-buffer () - "Configure src editing buffer." - (when org-src--babel-info - (org-src-associate-babel-session org-src--babel-info))) - -(add-hook 'org-src-mode-hook #'org-src-babel-configure-edit-buffer) - ;;; Public API -- 2.25.1