From e32c0668745962a6eec9c16acc1b7df3177f353f Mon Sep 17 00:00:00 2001 From: Dan Davison Date: Sat, 27 Mar 2010 18:29:25 -0400 Subject: [PATCH] babel: check that language major-mode is available during tangling --- contrib/babel/lisp/org-babel-tangle.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/contrib/babel/lisp/org-babel-tangle.el b/contrib/babel/lisp/org-babel-tangle.el index 64afef800..5dfbb94d6 100644 --- a/contrib/babel/lisp/org-babel-tangle.el +++ b/contrib/babel/lisp/org-babel-tangle.el @@ -91,7 +91,7 @@ exported source code blocks by language." (lang-specs (cdr (assoc lang org-babel-tangle-langs))) (ext (first lang-specs)) (she-bang (second lang-specs)) - (commentable (not (third lang-specs))) + (commentable (and (fboundp lang-f) (not (third lang-specs)))) she-banged) (mapc (lambda (spec) @@ -122,7 +122,7 @@ exported source code blocks by language." (delete-file file-name)) ;; drop source-block to file (with-temp-buffer - (funcall lang-f) + (if (fboundp lang-f) (funcall lang-f)) (when (and she-bang (not (member file-name she-banged))) (insert (concat she-bang "\n")) (setq she-banged (cons file-name she-banged)))