[O] Commit 6d2ab40 breaks table input in R

[Charles C. Berry]

This ECM fails with an error starting with the above commit.

#+NAME: numeric
| 1 | 2 | 3 |
| 4 | 5 | 6 |


#+BEGIN_SRC R :var df=numeric
df
#+END_SRC

Similar tests in test-ob-R.el also fail.

orgtbl-to-tsv now returns a propertized string.

---

Should this be fixed in org-table.el or downstream in ob-R.el?

Maybe like this:

diff --git a/lisp/ob-R.el b/lisp/ob-R.el
index 4bd6eea..4f9fb91 100644
--- a/lisp/ob-R.el
+++ b/lisp/ob-R.el
@@ -239,7 +239,8 @@ This function is called by 
`org-babel-execute-src-block'."
             (min (if lengths (apply 'min lengths) 0)))
         ;; Ensure VALUE has an orgtbl structure (depth of at least 2).
         (unless (listp (car value)) (setq value (list value)))
-       (let ((file (orgtbl-to-tsv value '(:fmt org-babel-R-quote-tsv-field)))
+       (let ((file (org-no-properties
+                    (orgtbl-to-tsv value '(:fmt org-babel-R-quote-tsv-field))))
              (header (if (or (eq (nth 1 value) 'hline) colnames-p)
                          "TRUE" "FALSE"))
              (row-names (if rownames-p "1" "NULL")))




Chuck