diff options
| author | Fabrice Popineau <fabrice.popineau@gmail.com> | 2016-07-07 11:25:12 +0200 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-07-07 12:17:49 +0200 |
| commit | ebe7aa66928a01f3af89c9ebeb5c5e130a5b3265 (patch) | |
| tree | caeda85e89cb3415e8a6104f751408a2b737b02e | |
| parent | e31587fa133b3fd20575c4a058cf859716cf362d (diff) | |
| download | org-mode-ebe7aa66928a01f3af89c9ebeb5c5e130a5b3265.tar.gz | |
org-eldoc: Handle source blocks with empty language
* contrib/lisp/org-eldoc.el (org-eldoc-get-src-header): When inserting
a new src block, the language may not yet be chosen when this is
called.
| -rw-r--r-- | contrib/lisp/org-eldoc.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/lisp/org-eldoc.el b/contrib/lisp/org-eldoc.el index 76ca3f5..9f2fef9 100644 --- a/contrib/lisp/org-eldoc.el +++ b/contrib/lisp/org-eldoc.el @@ -70,7 +70,7 @@ (save-match-data (when (looking-at "^[ \t]*#\\+\\(begin\\|end\\)_src") (setq info (org-babel-get-src-block-info 'light) - lang (propertize (nth 0 info) 'face 'font-lock-string-face) + lang (propertize (or (nth 0 info) "no lang") 'face 'font-lock-string-face) hdr-args (nth 2 info)) (concat lang |