From 5523a8f1b20c8b26d06dc187d5556cf2abdd1c67 Mon Sep 17 00:00:00 2001
From: Lorenz Walthert <lorenz.walthert@icloud.com>
Date: Sun, 24 Jan 2021 00:21:05 +0100
Subject: [PATCH] another hack for old R versions

---
 R/transform-files.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/transform-files.R b/R/transform-files.R
index fefd808f1..7f84d348d 100644
--- a/R/transform-files.R
+++ b/R/transform-files.R
@@ -224,7 +224,7 @@ parse_transform_serialize_r <- function(text,
     return("")
   }
   transformers <- transformers_subset(
-    pd_nested$text[!pd_nested$is_cached],
+    ifelse(getRversion() < 3.4, text, pd_nested$text[!pd_nested$is_cached]),
     transformers
   )
   blank_lines_to_next_expr <- find_blank_lines_to_next_block(pd_nested)