Ask for language when my-org-src-default-lang is nil

This commit is contained in:
contrapunctus 2022-01-21 13:58:37 +05:30
parent 22e297ba0f
commit b79ef3edaa
1 changed files with 1 additions and 1 deletions

View File

@ -3888,7 +3888,7 @@ or with ASK, prompt the user for a language."
(stringp my-org-src-default-lang)
(not ask))
my-org-src-default-lang)
((and src-block-p ask)
((and src-block-p (or (not lang) ask))
(completing-read "Source block language: "
(mapcar #'cl-first org-src-lang-modes)))
(t nil)))