10 lines
361 B
EmacsLisp
10 lines
361 B
EmacsLisp
;;; lang/org/autoload/babel.el
|
|
|
|
;;;###autoload
|
|
(defun +org/edit-special-same-window ()
|
|
(interactive)
|
|
(let ((shackle-rules '(("^\\*Org Src" :align t :select t :regexp t :noesc t :same t))))
|
|
(call-interactively #'org-edit-special)
|
|
;; FIXME too tightly coupled with doom-buffer-mode
|
|
(when (fboundp 'doom-buffer-mode)
|
|
(doom-buffer-mode +1))))
|