From bb54db57069ecdaecc0f84b8eeccb09c3e1810d1 Mon Sep 17 00:00:00 2001
From: afwillia <anthony.williams@sagebase.org>
Date: Tue, 20 Feb 2024 09:13:55 -0800
Subject: [PATCH] Use rlang backtrace for errors

---
 global.R | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/global.R b/global.R
index 5a1b4bfa..226387bf 100644
--- a/global.R
+++ b/global.R
@@ -32,6 +32,10 @@ message(sprintf("Available cores: %s", ncores))
 plan(multicore, workers = ncores)
 
 options(shiny.maxRequestSize=32*1024^2)
+options(
+  rlang_backtrace_on_error = "branch",
+  error = rlang::entrace
+)
 
 # import R files
 source_files <- list.files(c("functions", "modules"), pattern = "*\\.R$", recursive = TRUE, full.names = TRUE)