org-src: Silence byte-compiler

lisp/org-src.el

@@ -645,6 +645,18 @@ See also `org-src-mode-hook'."
 
 (add-hook 'org-src-mode-hook #'org-src-babel-configure-edit-buffer)
 
+
+;;; Public API
+
+(defmacro org-src-do-at-code-block (&rest body)
+  "Execute BODY from an edit buffer in the Org mode buffer."
+  (declare (debug (body)))
+  `(let ((beg-marker org-src--beg-marker))
+     (when beg-marker
+       (with-current-buffer (marker-buffer beg-marker)
+	 (goto-char beg-marker)
+	 ,@body))))
+
 (defun org-src-do-key-sequence-at-code-block (&optional key)
   "Execute key sequence at code block in the source Org buffer.
 The command bound to KEY in the Org-babel key map is executed
@@ -669,19 +681,6 @@ Org-babel commands."
     (org-src-do-at-code-block
      (call-interactively (lookup-key org-babel-map key)))))
 
-
-
-;;; Public functions
-
-(defmacro org-src-do-at-code-block (&rest body)
-  "Execute BODY from an edit buffer in the Org mode buffer."
-  (declare (debug (body)))
-  `(let ((beg-marker org-src--beg-marker))
-     (when beg-marker
-       (with-current-buffer (marker-buffer beg-marker)
-	 (goto-char beg-marker)
-	 ,@body))))
-
 (defun org-src-edit-buffer-p (&optional buffer)
   "Non-nil when current buffer is a source editing buffer.
 If BUFFER is non-nil, test it instead."