diff options
| author | Bastien Guerry <bastien1@free.fr> | 2012-04-01 11:49:25 +0200 |
|---|---|---|
| committer | Bastien Guerry <bastien1@free.fr> | 2012-04-01 11:49:25 +0200 |
| commit | 153ae947f845f6d4f31d3d239a1449899c3384f0 (patch) | |
| tree | b7ef6c7f4b94f4a4ee19eecd079c36aff84bddc5 /lisp/org/ob-emacs-lisp.el | |
| parent | 42ee526b1adbe2ba7766203980a9d7089aae1a68 (diff) | |
| download | emacs-153ae947f845f6d4f31d3d239a1449899c3384f0.tar.gz | |
Update to Org version 7.8.07 (commit da0e6f in Org's repo)
Diffstat (limited to 'lisp/org/ob-emacs-lisp.el')
| -rw-r--r-- | lisp/org/ob-emacs-lisp.el | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/lisp/org/ob-emacs-lisp.el b/lisp/org/ob-emacs-lisp.el index afbc20d5fc5..c8af6062002 100644 --- a/lisp/org/ob-emacs-lisp.el +++ b/lisp/org/ob-emacs-lisp.el @@ -41,13 +41,13 @@ (result-params (cdr (assoc :result-params params))) (print-level nil) (print-length nil) (body (if (> (length vars) 0) - (concat "(let (" - (mapconcat - (lambda (var) - (format "%S" (print `(,(car var) ',(cdr var))))) - vars "\n ") - ")\n" body ")") - body))) + (concat "(let (" + (mapconcat + (lambda (var) + (format "%S" (print `(,(car var) ',(cdr var))))) + vars "\n ") + ")\n" body "\n)") + (concat body "\n")))) (if (or (member "code" result-params) (member "pp" result-params)) (concat "(pp " body ")") body))) |