From 10a07a644bc1704cbc35a25fc3573fee0ea0e286 Mon Sep 17 00:00:00 2001 From: Dan Davison Date: Fri, 30 Apr 2010 12:36:58 -0400 Subject: [PATCH] babel: R: allow forcing of colnames without hline --- contrib/babel/lisp/langs/org-babel-R.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/contrib/babel/lisp/langs/org-babel-R.el b/contrib/babel/lisp/langs/org-babel-R.el index f05c2f843..289c73d4d 100644 --- a/contrib/babel/lisp/langs/org-babel-R.el +++ b/contrib/babel/lisp/langs/org-babel-R.el @@ -121,7 +121,7 @@ called by `org-babel-execute-src-block'." (insert "\n")) (format "%s <- read.table(\"%s\", header=%s, row.names=%s, sep=\"\\t\", as.is=TRUE)" name transition-file - (if (and (eq (second value) 'hline) colnames-p) "TRUE" "FALSE") + (if (or (eq (second value) 'hline) colnames-p) "TRUE" "FALSE") (if rownames-p "1" "NULL"))) (format "%s <- %s" name (org-babel-R-quote-tsv-field value))))