Fix some compiler warnings.

* org.el (org-in-fixed-width-region-p): Define before use.

* org-src.el (org-in-src-block-p): Declare function.

2 files changed, 5 insertions, 4 deletions

diff --git a/lisp/org-src.el b/lisp/org-src.el
index 6937c59..d2e2192 100644
--- a/lisp/org-src.el
+++ b/lisp/org-src.el
@@ -39,6 +39,7 @@
 
 (declare-function org-do-remove-indentation "org" (&optional n))
 (declare-function org-at-table.el-p "org" ())
+(declare-function org-in-src-block-p "org" (&optional inside))
 (declare-function org-get-indentation "org" (&optional line))
 (declare-function org-switch-to-buffer-other-window "org" (&rest args))
 (declare-function org-pop-to-buffer-same-window
diff --git a/lisp/org.el b/lisp/org.el
index 812c1cd..82a099f 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -18958,6 +18958,10 @@ See the individual commands for more information."
       (org-table-paste-rectangle)
     (org-paste-subtree arg)))
 
+(defsubst org-in-fixed-width-region-p ()
+  "Is point in a fixed-width region?"
+  (eq 'fixed-width (org-element-type (org-element-at-point))))
+
 (defun org-edit-special (&optional arg)
   "Call a special editor for the stuff at point.
 When at a table, call the formula editor with `org-table-edit-formulas'.
@@ -20255,10 +20259,6 @@ when point is at #+BEGIN_SRC or #+END_SRC."
 		 (move-beginning-of-line 1)
 		 (looking-at ".*#\\+\\(BEGIN\\|END\\)_SRC")))))))
 
-(defsubst org-in-fixed-width-region-p ()
-  "Is point in a fixed-width region?"
-  (eq 'fixed-width (org-element-type (org-element-at-point))))
-
 (defun org-context ()
   "Return a list of contexts of the current cursor position.
 If several contexts apply, all are returned.