Merge from emacs-23; up to 2010-06-12T10:58:54Z!romain@orebokech.com.

[gnu-emacs] / lisp / org / ob-ref.el

diff --git a/lisp/org/ob-ref.el b/lisp/org/ob-ref.el
index 7b06e90f924cf04615edc12ca395c2875bb5de8e..96819df8ea10b4ec80d2f9f23210bfc3b85962fc 100644 (file)
--- a/lisp/org/ob-ref.el
+++ b/lisp/org/ob-ref.el
@@ -147,12 +147,12 @@ the variable."
        (let ((params (append args '((:results . "silent")))))
          (setq result
                (case type
-                 ('results-line (org-babel-read-result))
-                 ('table (org-babel-read-table))
-                 ('list (org-babel-read-list))
-                 ('file (org-babel-read-link))
-                 ('source-block (org-babel-execute-src-block nil nil params))
-                 ('lob (org-babel-execute-src-block nil lob-info params)))))
+                 (results-line (org-babel-read-result))
+                 (table (org-babel-read-table))
+                 (list (org-babel-read-list))
+                 (file (org-babel-read-link))
+                 (source-block (org-babel-execute-src-block nil nil params))
+                 (lob (org-babel-execute-src-block nil lob-info params)))))
        (if (symbolp result)
            (format "%S" result)
          (if (and index (listp result))