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.
This commit is contained in:
parent
e31587fa13
commit
ebe7aa6692
|
@ -70,7 +70,7 @@
|
||||||
(save-match-data
|
(save-match-data
|
||||||
(when (looking-at "^[ \t]*#\\+\\(begin\\|end\\)_src")
|
(when (looking-at "^[ \t]*#\\+\\(begin\\|end\\)_src")
|
||||||
(setq info (org-babel-get-src-block-info 'light)
|
(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))
|
hdr-args (nth 2 info))
|
||||||
(concat
|
(concat
|
||||||
lang
|
lang
|
||||||
|
|
Loading…
Reference in New Issue