Initialize native-tab-width in cases where there is no language mode

org-src-font-lock-fontify-block creates an uninitialized
native-tab-width variable and then, when there is no language set on a
block, ends up using it.  This triggers an error.

1 files changed, 2 insertions, 1 deletions

diff --git a/lisp/org/org-src.el b/lisp/org/org-src.el
index d8a928b1f9f..49fc4103cc7 100644
--- a/lisp/org/org-src.el
+++ b/lisp/org/org-src.el
@@ -665,7 +665,8 @@ Leave point in edit buffer."
   "Fontify code block between START and END using LANG's syntax.
 This function is called by Emacs's automatic fontification, as long
 as `org-src-fontify-natively' is non-nil."
-  (let ((modified (buffer-modified-p)) native-tab-width)
+  (let ((modified (buffer-modified-p))
+        (native-tab-width tab-width))
     (remove-text-properties start end '(face nil))
     (let ((lang-mode (org-src-get-lang-mode lang)))
       (when (fboundp lang-mode)