Browse Source

Revert "org-src: Add RET to go from overlay to edit buffer"

This reverts commit 0d39ea6ef3ee55424a322c38eb6857299dca11f2.
Marco Wahl 2 years ago
parent
commit
4f0f244477
2 changed files with 0 additions and 9 deletions
  1. 0 2
      etc/ORG-NEWS
  2. 0 7
      lisp/org-src.el

+ 0 - 2
etc/ORG-NEWS

@@ -291,8 +291,6 @@ purpose of the variable.  The replacement variable
 accepts =listings= and =verbatim= in place of =t= and =nil= (which
 still work, but are no longer listed as valid options).
 
-*** New function ~org-edit-src-goto~ 
-
 * Version 9.5
 
 ** Important announcements and breaking changes

+ 0 - 7
lisp/org-src.el

@@ -413,7 +413,6 @@ END."
     (overlay-put overlay 'keymap
 		 (let ((map (make-sparse-keymap)))
 		   (define-key map [mouse-1] 'org-edit-src-continue)
-                   (define-key map [return] #'org-edit-src-goto)
 		   map))
     (let ((read-only
 	   (list
@@ -1274,12 +1273,6 @@ Throw an error if there is no such buffer.
 EVENT is passed to `mouse-set-point'."
   (interactive "e")
   (mouse-set-point event)
-  (org-edit-src-goto))
-
-(defun org-edit-src-goto ()
-  "Unconditionally return to buffer editing area under point.
-Throw an error if there is no such buffer."
-  (interactive)
   (let ((buf (get-char-property (point) 'edit-buffer)))
     (if buf (org-src-switch-to-buffer buf 'continue)
       (user-error "No sub-editing buffer for area at point"))))