From 1be13d57dc8357576a8285c6dadc03db9e3ed7b0 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?S=C3=A9bastien=20Delafond?= Date: Tue, 25 Aug 2015 12:27:35 +0200 Subject: Imported Upstream version 8.3.1 --- contrib/lisp/ob-tcl.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'contrib/lisp/ob-tcl.el') diff --git a/contrib/lisp/ob-tcl.el b/contrib/lisp/ob-tcl.el index 50afe5a..d66357d 100644 --- a/contrib/lisp/ob-tcl.el +++ b/contrib/lisp/ob-tcl.el @@ -62,7 +62,7 @@ This function is called by `org-babel-execute-src-block'." (defun org-babel-prep-session:tcl (session params) "Prepare SESSION according to the header arguments in PARAMS." - (error "Sessions are not supported for Tcl.")) + (error "Sessions are not supported for Tcl")) (defun org-babel-variable-assignments:tcl (params) "Return list of tcl statements assigning the block's variables." @@ -111,7 +111,7 @@ close $o If RESULT-TYPE equals 'output then return a list of the outputs of the statements in BODY, if RESULT-TYPE equals 'value then return the value of the last statement in BODY, as elisp." - (when session (error "Sessions are not supported for Tcl.")) + (when session (error "Sessions are not supported for Tcl")) (case result-type (output (org-babel-eval org-babel-tcl-command body)) (value (let ((tmp-file (org-babel-temp-file "tcl-"))) -- cgit v1.2.3