From 2a688e9aebb898723e4016b535dbdffa5b2cb86e Mon Sep 17 00:00:00 2001 From: Eric Schulte Date: Wed, 8 Sep 2010 04:38:05 +0000 Subject: [PATCH] Explicitly mention when a language-mode throws an error Hi, The attached patch makes it clear when a language mode has thrown an error. This can clear up confusion whether an error is originating from Org-mode or form the language-mode in question. Should this be committed? Best -- Eric --- lisp/org-src.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/org-src.el b/lisp/org-src.el index d1948cc54..233058a54 100644 --- a/lisp/org-src.el +++ b/lisp/org-src.el @@ -276,7 +276,10 @@ buffer." (unless preserve-indentation (setq total-nindent (or (org-do-remove-indentation) 0))) (let ((org-inhibit-startup t)) - (funcall lang-f)) + (condition-case e + (funcall lang-f) + (error + (error "Language mode `%s' fails with: %S" lang-f (nth 1 e))))) (set (make-local-variable 'org-edit-src-force-single-line) single) (set (make-local-variable 'org-edit-src-from-org-mode) org-mode-p) (set (make-local-variable 'org-edit-src-allow-write-back-p) allow-write-back-p)