* lisp/org.el (org-fontify-meta-lines-and-blocks-1): Fix test for src blocks
lang attribute

When there is no lang attribute to a block (for quote, verse or others), the
lang variable is not nil, but an empty string.
---
 lisp/org.el |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/lisp/org.el b/lisp/org.el
index 9fddf3f..fb1041d 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -5207,7 +5207,7 @@ will be prompted for."
              (add-text-properties end1 (+ end 1) '(face org-meta-line))
                                        ; for end_src
              (cond
-              ((and lang org-src-fontify-natively)
+              ((and lang (not (string= lang "")) org-src-fontify-natively)
                (org-src-font-lock-fontify-block lang block-start block-end)
                ;; remove old background overlays
                (mapc (lambda (ov)
-- 
1.7.5.4



Reply via email to