cache sql result

the original author of this idea is @yihui: yihui#1542 (review)
yutannihilation · May 10, 2018 · 449b5a2 · 449b5a2
1 parent 4b64980
commit 449b5a2
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/R/block.R b/R/block.R
@@ -111,7 +111,10 @@ block_exec = function(options) {
     output = knit_hooks$get('chunk')(output, options)
     if (options$cache) block_cache(
       options, output,
-      if (options$engine == 'stan') options$engine.opts$x else character(0)
+      switch(
+        options$engine,
+        'stan' = options$engine.opts$x, 'sql' = options$output.var
+      )
     )
     return(if (options$include) output else '')
   }